1extproc ksh 2# 3# Simple script to find perl and run it 4# for os2 5 6IFS=\;$IFS 7perl= 8for i in $PATH; do 9 [ X"$i" = X ] && i=. 10 for j in perl perl5x perl5 ; do 11 [ -x $i/$j.exe ] && perl=$i/$j.exe && break 2 12 done 13done 14 15[ X"$perl" = X ] && { 16 echo "$0: can't find perl - bye\n" 1>&2 17 exit 1 18 } 19 20perlpath=`dirname $perl` 21if [ `basename $perlpath` = bin ] 22then perlpath=`dirname $perlpath` 23fi 24if [ "$PERL5LIB" = "" ] 25then PERL5LIB=$perlpath/lib 26fi 27export PERL5LIB 28exec $perl "$@" 29