On 1/31/2003 4:51 AM, Ahmed, Mubariz wrote:
Hi,

I have problem with find and replace. Below is the script

$src="c:\\mub\\mubwork";
$inter="c:\\mub\\mubwork\\test\\tets1";
$dest="c:\\mubariz\\dpgdata";
$inter=~s/$src/$dest/; # Result should be c:\mubariz\dpgdata\test\tets1
$inter=~s/\Q$src\E/$dest/;

print $inter;

_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to