#! /bin/sh 
if [ `uname -n` = "-- computer name --" ] then 
eval ' exec /sw/perl/5.6.1/WS/7/bin/perl -x $0 "$@" ' 
else 
eval ' exec /usr/bin/perl -x $0 "$@" ' fi 
#! perl