On Fri, 2006-12-29 at 23:36 -0500, Mathew Snyder wrote: > 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; >
exit if $ans =~ m/^(y|yes)[ \t\r\n]*$/i; The brackets are a group, square brackets are a character class. It is probably a good idea to ignore whitespace around the error as well. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
