diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-29 14:42:58 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-29 14:42:58 +0000 |
commit | 1dea82101a63718e53cc60bcb31614bc42ddebd7 (patch) | |
tree | eb787a48bdc8d6dc39396668a517051039aae615 /utils/h2xs.PL | |
parent | f1f595f582f5c084b3fa5f855859610439f2b2ce (diff) | |
download | perl-1dea82101a63718e53cc60bcb31614bc42ddebd7.tar.gz |
use warnings instead of -w.
p4raw-id: //depot/perl@9440
Diffstat (limited to 'utils/h2xs.PL')
-rw-r--r-- | utils/h2xs.PL | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/utils/h2xs.PL b/utils/h2xs.PL index 425704bd81..932e015433 100644 --- a/utils/h2xs.PL +++ b/utils/h2xs.PL @@ -26,7 +26,7 @@ print "Extracting $file (with variable substitutions)\n"; # You can use $Config{...} to use Configure variables. print OUT <<"!GROK!THIS!"; -$Config{startperl} -w +$Config{startperl} eval 'exec $Config{perlpath} -S \$0 \${1+"\$@"}' if \$running_under_some_shell; !GROK!THIS! @@ -35,6 +35,8 @@ $Config{startperl} -w print OUT <<'!NO!SUBS!'; +use warnings; + =head1 NAME h2xs - convert .h C header files to Perl extensions |