cURL / Mailing Lists / curl-library / Single Mail

curl-library

[PATCH] Correct testcurl.pl invocation

From: Tor Arntsen <tor_at_spacetec.no>
Date: Thu, 25 Mar 2004 13:11:49 +0100

'perl -w' won't work if you invoke it via /usr/bin/env.
Set the $^W variable instead (see patch below).

There's another problem -- the script should have the execution bits set,
but it has been checked into CVS without them. The only way to fix that
is for Daniel to go directly to the repository and do a chmod a+x,
unfortunately that won't change anything for those who have already checked
it out (delete the script and it'll get it right for the next 'cvs update',
or chmod a+x testcurl.pl in your own CVS tree).

-Tor
-----

Index: tests/testcurl.pl
===================================================================
RCS file: /repository/curl/tests/testcurl.pl,v
retrieving revision 1.5
diff -u -r1.5 testcurl.pl
--- tests/testcurl.pl 25 Mar 2004 11:39:29 -0000 1.5
+++ tests/testcurl.pl 25 Mar 2004 12:05:35 -0000
@@ -1,4 +1,4 @@
-#!/usr/bin/env perl -w
+#!/usr/bin/env perl
 #***************************************************************************
 # _ _ ____ _
 # Project ___| | | | _ \| |
@@ -46,6 +46,9 @@
 
 use Cwd;
 
+# Turn on warnings (equivalent to -w, which can't be used with /usr/bin/env)
+BEGIN { $^W = 1; }
+
 use vars qw($version $fixed $infixed $CURLDIR $CVS $pwd $build $buildlog $buildlogname $gnulikebuild);
 use vars qw($name $email $desc $confopts);
 
Received on 2004-03-25