Ken Foskey wrote: > 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. > >
Ok, nevermind. I just switched the order in which the check is made. I was checking for anything other than the 'y' or 'yes' input and exiting if so. I was then using the else clause as the actual execution if 'y' or 'yes' were found. I put that first and the exit statement in the else clause and it does what I was looking for. Thanks for the correction of my regex though. That did help :D Mathew -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
