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