$q contains decoded msgs using MIME::Base64, and is any random word
from a dictionary of 45000 words.
On 4/26/07, Dr.Ruud <[EMAIL PROTECTED]> wrote:
Somu schreef:
> why wont the following work?
>
> $$q = shift;
print length($$q), " ";
$$p = "pass";
> if ( $$q =~ m/$$p/i ) { print 'match' }
>
> But it works on changing the $$q and $$p places..
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
