X-Git-Url: http://sjero.net/git/?p=wget;a=blobdiff_plain;f=tests%2FFTPTest.pm;h=81b8b008eaa343f3d768e1d20c830fd8472f3e41;hp=eed2eb89e930df48128d1e36781a7dbe0249b20a;hb=d763f8bf6d6e13ce006ffab616cc8a77e747a633;hpb=2e2ac6ad2fc90eaf46ae5fee0bc4f61dd97b4284

diff --git a/tests/FTPTest.pm b/tests/FTPTest.pm
index eed2eb89..81b8b008 100644
--- a/tests/FTPTest.pm
+++ b/tests/FTPTest.pm
@@ -1,8 +1,7 @@
-#!/usr/bin/perl -w
-
 package FTPTest;
 
 use strict;
+use warnings;
 
 use FTPServer;
 use WgetTest;
@@ -14,7 +13,7 @@ my $VERSION = 0.01;
 {
     my %_attr_data = ( # DEFAULT
     );
-    
+
     sub _default_for
     {
         my ($self, $attr) = @_;
@@ -28,7 +27,7 @@ my $VERSION = 0.01;
         ($self->SUPER::_standard_keys(), keys %_attr_data);
     }
 }
-    
+
 
 sub _setup_server {
     my $self = shift;