#!/bin/sh

set `echo $PATH | sed 's/:/ /g'`

while [ "$1" != "" ]; do
    if [ -f "$1/perl" ]; then
	echo "$1/perl"
	exit 0
    fi
    shift
done

echo "/usr/bin/perl"
