in reply to Simple Regex Question

$str = "abcdefghijklmnopQrstuzwxyz";
if($str =~ /[A-Z]/){print "match!";}

[download]

In Section Seekers of Perl Wisdom