diff options
Diffstat (limited to 'Master/tlpkg/tlperl/bin/cpanp-run-perl')
| -rwxr-xr-x | Master/tlpkg/tlperl/bin/cpanp-run-perl | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/Master/tlpkg/tlperl/bin/cpanp-run-perl b/Master/tlpkg/tlperl/bin/cpanp-run-perl deleted file mode 100755 index 34e62bddd04..00000000000 --- a/Master/tlpkg/tlperl/bin/cpanp-run-perl +++ /dev/null @@ -1,10 +0,0 @@ -use strict; -my $old = select STDERR; $|++; # turn on autoflush -select $old; $|++; # turn on autoflush -$0 = shift(@ARGV); # rename the script -my $rv = do($0); # execute the file -die $@ if $@; # die on parse/execute error - -### XXX 'do' returns last statement evaluated, which may be -### undef as well. So don't die in that case. -#die $! if not defined $rv; # die on execute error |