I'm trying to set up an if clause to exit if an answer given is anything but
either any case combination of 'y' or 'yes'.  This is what I have:

exit if $ans =~ m/[^y|^yes]/i;

Will that do what I want?


Mathew

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


Reply via email to