1#!/usr/bin/env perl 2 3use strict; 4use warnings; 5 6use HTTPTest; 7 8 9############################################################################### 10 11# code, msg, headers, content 12my %urls = ( 13 '/dummy' => { 14 code => "204", 15 msg => "Dontcare", 16 }, 17); 18 19my $cmdline = $WgetTest::WGETPATH . " http://localhost:{{port}}/dummy"; 20 21my $expected_error_code = 0; 22 23my %expected_downloaded_files = ( 24); 25 26############################################################################### 27 28my $the_test = HTTPTest->new (input => \%urls, 29 cmdline => $cmdline, 30 errcode => $expected_error_code, 31 output => \%expected_downloaded_files); 32exit $the_test->run(); 33 34# vim: et ts=4 sw=4 35