9 ###############################################################################
14 <title>Main Page</title>
18 Some text and a link to a <a href="http://localhost:{{port}}/secondpage.html">second page</a>.
19 Also, a <a href="http://localhost:{{port}}/nonexistent">broken link</a>.
25 my $secondpage = <<EOF;
28 <title>Second Page</title>
32 Some text and a link to a <a href="http://localhost:{{port}}/thirdpage.html">third page</a>.
33 Also, a <a href="http://localhost:{{port}}/nonexistent">broken link</a>.
39 my $thirdpage = <<EOF;
42 <title>Third Page</title>
46 Some text and a link to a <a href="http://localhost:{{port}}/dummy.txt">text file</a>.
47 Also, another <a href="http://localhost:{{port}}/againnonexistent">broken link</a>.
53 my $dummyfile = <<EOF;
57 # code, msg, headers, content
63 "Content-type" => "text/html",
67 '/secondpage.html' => {
71 "Content-type" => "text/html",
72 "Content-Disposition" => "attachment; filename=\"filename.html\"",
74 content => $secondpage,
76 '/thirdpage.html' => {
80 "Content-type" => "text/html",
82 content => $thirdpage,
88 "Content-type" => "text/plain",
94 my $cmdline = $WgetTest::WGETPATH . " --spider -r http://localhost:{{port}}/";
96 my $expected_error_code = 8;
98 my %expected_downloaded_files = (
101 ###############################################################################
103 my $the_test = HTTPTest->new (name => "Test--spider-r-HTTP-Content-Disposition",
106 errcode => $expected_error_code,
107 output => \%expected_downloaded_files);
108 exit $the_test->run();