X-Git-Url: http://sjero.net/git/?a=blobdiff_plain;f=tests%2FTest-ftp.px;h=49a96810d149a1ae20f9342de42f99a71f556c16;hb=4a08094db88011153adadbf995103770b20d2a31;hp=8cef5a55f8f9ca26c91a06dbdba787484cbe7a76;hpb=1a33947ca02dbb568eda1eb0a020abe39e87d86d;p=wget diff --git a/tests/Test-ftp.px b/tests/Test-ftp.px index 8cef5a55..49a96810 100755 --- a/tests/Test-ftp.px +++ b/tests/Test-ftp.px @@ -1,6 +1,7 @@ -#!/usr/bin/perl -w +#!/usr/bin/perl use strict; +use warnings; use FTPTest; @@ -34,9 +35,9 @@ my %expected_downloaded_files = ( ############################################################################### my $the_test = FTPTest->new (name => "Test-ftp", - input => \%urls, - cmdline => $cmdline, - errcode => $expected_error_code, + input => \%urls, + cmdline => $cmdline, + errcode => $expected_error_code, output => \%expected_downloaded_files); exit $the_test->run();