blob: 9c866b62b4f4d4f6f46babc08e6127cf297cceea (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
#!/usr/bin/env perl
use strict;
use warnings;
use HTTPTest;
###############################################################################
my $cmdline = $WgetTest::WGETPATH . " --post-file=nofile http://localhost:{{port}}/";
my $expected_error_code = 3;
###############################################################################
my $the_test = HTTPTest->new (cmdline => $cmdline,
errcode => $expected_error_code);
exit $the_test->run();
# vim: et ts=4 sw=4
|