RE: stupid pattern match question

[Grakowsky, Richard (ETS: CNS)]

Try this...

if (/\Q$target\E/) { DoStuff; }

Thanks,
Rick
----------------------------------------------------------------
Richard Grakowsky
Systems Specialist, Monroe Community College
[EMAIL PROTECTED]
Office: 585.292.3236 / Fax: 585.427.2749
"Progress occurs when we are no longer willing
to accept the consequences of inaction."


-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Monday, August 04, 2003 5:14 PM
To: [EMAIL PROTECTED]
Subject: stupid pattern match question

I'm not quite sure how to code this,  (or search for a solution to....)


I want to search a text file, and replace a text string of the format
$xxxxxxx.  Example: I want to search for $sysname in a file, but I want
to
first
assign that string to a perl variable.  I've tried various combinations
of
escaping the $, but it is not working.


so something like this:

$target = "$sysname";

if (/$target/)
{
     print "found $sysname\n";

}


however, if I do this, it works.

if /\$sysname/
{
     print "found $sysname\n";

}



Thanks.
Chris









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

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