why wont the following work?

$q = shift;
$p = "pass";
if ( $q =~ m/$p/i ) { print 'match' }

But it works on changing the $q and $p places..

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


Reply via email to