X-Git-Url: http://sjero.net/git/?a=blobdiff_plain;f=tests%2FTest-iri-list.px;h=dc55eeca4c85e8dec1a602a73621af90a5f03a5a;hb=4a08094db88011153adadbf995103770b20d2a31;hp=51bb09fe313404315ff449ca5a619e0502a2fbf2;hpb=723dbfc818e3e5b22ec53fd093dca999290ebead;p=wget diff --git a/tests/Test-iri-list.px b/tests/Test-iri-list.px index 51bb09fe..dc55eeca 100755 --- a/tests/Test-iri-list.px +++ b/tests/Test-iri-list.px @@ -1,7 +1,9 @@ -#!/usr/bin/perl -w +#!/usr/bin/perl use strict; +use warnings; +use WgetFeature qw(iri); use HTTPTest; # cf. http://en.wikipedia.org/wiki/Latin1 @@ -163,9 +165,9 @@ my %expected_downloaded_files = ( ############################################################################### my $the_test = HTTPTest->new (name => "Test-iri-list", - input => \%urls, - cmdline => $cmdline, - errcode => $expected_error_code, + input => \%urls, + cmdline => $cmdline, + errcode => $expected_error_code, output => \%expected_downloaded_files); exit $the_test->run();