14 lines
205 B
Plaintext
14 lines
205 B
Plaintext
|
perl=`which perl`
|
||
|
if [ $# -ne 2 ]
|
||
|
then
|
||
|
echo "Usage $0 source target" >&2
|
||
|
exit 1
|
||
|
fi
|
||
|
if [ -z "$perl" ]
|
||
|
then
|
||
|
echo "$0: cannot find perl binary" >&2
|
||
|
exit 1
|
||
|
fi
|
||
|
sed -e "s,@@@perl@@@,$perl," < $1 > $2
|
||
|
exit 0
|