I prefer this

$x =~ /^[x-z]$/i;


Normally, I will use:

my $ans = ( $x =~ /^[x-z]$/i )?"yes":"no";
print "\n\nThe answer = $ans\n";
__________________

William Ampeh (x3939)
Federal Reserve Board


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to