-----Original Message-----
>From: Jeff Pang <[EMAIL PROTECTED]>
>#!/bin/sh
>FILE=$1
>REPLACED=$2
>REPLACEMENT=$3
>
>perl -pi.bak -e 's/\Q$REPLACED\E/$REPLACEMENT/' $FILE
>echo "DONE"
>

Found the problem,here shell variables can't be passed into Perl program.
Maybe using environment variables,or better solution?

#!/bin/sh
FILE=$1
export REPLACED=$2
export REPLACEMENT=$3

perl -pi.bak -e 's/\Q$ENV{REPLACED}\E/$ENV{REPLACEMENT}/' $FILE
echo "DONE"

--
Jeff Pang <[EMAIL PROTECTED]>
http://home.arcor.de/jeffpang/

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to