in reply to Re: Problem with regular expression
in thread Problem with regular expression

oops, I missed the one with a colon :( 
(?: # begin non capturing group
CR|ID # alternation accepts either pattern group 'CR' or 'ID'
)? # group is optional

[download]

print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."

In Section Seekers of Perl Wisdom