9 ###############################################################################
11 my $dummyfile = <<EOF;
15 # code, msg, headers, content
21 "Content-type" => "text/plain",
22 "Last-Modified" => "Sat, 09 Oct 2004 08:30:00 GMT",
23 "Content-Disposition" => "attachment; filename=\"filename.txt\"",
29 my $cmdline = $WgetTest::WGETPATH . " -N --content-disposition "
30 . "http://localhost:{{port}}/dummy.txt";
32 my $expected_error_code = 0;
34 my %expected_downloaded_files = (
36 content => $dummyfile,
37 timestamp => 1097310600, # "Sat, 09 Oct 2004 08:30:00 GMT"
41 ###############################################################################
43 my $the_test = HTTPTest->new (name => "Test-N-HTTP-Content-Disposition",
46 errcode => $expected_error_code,
47 output => \%expected_downloaded_files);
48 exit $the_test->run();