diff options
Diffstat (limited to 'Master/tlpkg/tlperl0/bin/pler')
-rwxr-xr-x | Master/tlpkg/tlperl0/bin/pler | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/Master/tlpkg/tlperl0/bin/pler b/Master/tlpkg/tlperl0/bin/pler new file mode 100755 index 00000000000..01002aa034b --- /dev/null +++ b/Master/tlpkg/tlperl0/bin/pler @@ -0,0 +1,27 @@ +#!/usr/bin/perl + +use 5.00503; +use strict; + +# On some platforms (mostly Windows), we get errors because +# of Term::Cap issues. To avoid this, set TERM=dumb if the +# user does not have a TERM value already. +# This doesn't remove all possible errors, just the most +# annoying and common ones. +BEGIN { + $ENV{TERM} ||= 'dumb'; +} + +use vars qw{$VERSION}; +BEGIN { + $VERSION = '1.05'; +} + +use pler (); + +unless ( $VERSION eq $pler::VERSION ) { + die "Error: Version mismatch (launch script $VERSION using module $pler::VERSION)"; +} +pler::main(@ARGV); + +exit(0); |