in reply to Re: Re: Can you teach a new dog an old trick?in thread Can you teach a new dog an old trick?
You need to use a BEGIN block, like so:
#!/usr/bin/perl -wpi BEGIN { ($src,$dst)=(@ARGV); } s/$src/$dst/g; [download]