Commit | Line | Data |
---|---|---|
5f05dabc | 1 | eval 'exec /usr/bin/perl -Spi.bak $0 ${1+"$@"}' |
378cc40b | 2 | if $running_under_some_shell; |
3 | ||
79072805 | 4 | # $RCSfile: nih,v $$Revision: 4.1 $$Date: 92/08/07 17:20:27 $ |
378cc40b | 5 | |
6 | # This script makes #! scripts directly executable on machines that don't | |
7 | # support #!. It edits in place any scripts mentioned on the command line. | |
8 | ||
5f05dabc | 9 | s[^#!(.*)] |
10 | [#!$1\neval 'exec $1 -S \$0 \${1+"\$@"}'\n\tif \$running_under_some_shell;] | |
378cc40b | 11 | if $. == 1; |