This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
NetBSD and OpenBSD cannot do comments at #! line
authorJarkko Hietaniemi <jhi@iki.fi>
Sat, 27 Apr 2002 00:52:30 +0000 (00:52 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Sat, 27 Apr 2002 00:52:30 +0000 (00:52 +0000)
(or long #! lines?)

p4raw-id: //depot/perl@16206

t/japh/abigail.t

index 06bba7a..2391073 100644 (file)
@@ -223,11 +223,11 @@ plan tests => 130;
     END {unlink_all $progfile}
 
     my @programs = (<< '    --', << '    --');
-#!./perl               --    # No trailing newline after the last line!    
+#!./perl
 BEGIN{$|=$SIG{__WARN__}=sub{$_=$_[0];y-_- -;print/(.)"$/;seek _,-open(_ 
 ,"+<$0"),2;truncate _,tell _;close _;exec$0}}//rekcaH_lreP_rehtona_tsuJ
     --
-#!./perl               --   # Remove trailing newline!
+#!./perl
 BEGIN{$SIG{__WARN__}=sub{$_=pop;y-_- -;print/".*(.)"/;  
 truncate$0,-1+-s$0;exec$0;}}//rekcaH_lreP_rehtona_tsuJ
     --