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",
73 content => $secondpage,
75 '/thirdpage.html' => {
79 "Content-type" => "text/html",
81 content => $thirdpage,
87 "Content-type" => "text/plain",
93 my $cmdline = $WgetTest::WGETPATH . " --spider -r http://localhost:{{port}}/";
95 my $expected_error_code = 8;
97 my %expected_downloaded_files = (
100 ###############################################################################
102 my $the_test = HTTPTest->new (name => "Test--spider-r",
105 errcode => $expected_error_code,
106 output => \%expected_downloaded_files);
107 exit $the_test->run();