diff options
author | levine <levine@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1998-12-30 03:34:28 +0000 |
---|---|---|
committer | levine <levine@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1998-12-30 03:34:28 +0000 |
commit | b6096e014014be1257336ff7e57105bfce9f502b (patch) | |
tree | 2c6b1ad6764ebc84368aaa6abd2fedee809a95e9 /bin/rename-ace.pl | |
parent | 1d9693f1457c564c343508ea1f10ebe390c88da4 (diff) | |
download | ATCD-b6096e014014be1257336ff7e57105bfce9f502b.tar.gz |
moved eval magic to very first line of file, so that the first line doesn't start with a #
Diffstat (limited to 'bin/rename-ace.pl')
-rwxr-xr-x | bin/rename-ace.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/bin/rename-ace.pl b/bin/rename-ace.pl index 0bd045a1a86..0e1bd66069f 100755 --- a/bin/rename-ace.pl +++ b/bin/rename-ace.pl @@ -1,13 +1,13 @@ +eval '(exit $?0)' && eval 'exec perl -pi -S $0 ${1+"$@"}' + & eval 'exec perl -pi -S $0 $argv:q' + if 0; + # $Id$ -# The following three lines let this script run without specifying the +# The first three lines above let this script run without specifying the # full path to perl, as long as it is in the user's PATH. # Taken from perlrun man page. -eval '(exit $?0)' && eval 'exec perl -pi -S $0 ${1+"$@"}' - & eval 'exec perl -pi -S $0 $argv:q' - if 0; - s/\bAcceptor\b/ACE_Acceptor/g; s/\bAddr\b/ACE_Addr/g; s/\bArgument_Vector\b/ACE_ARGV/g; |