http://qs321.pair.com?node_id=402372


in reply to Regex help

Another method:

m/B(?:3[89]|4\d)/
May the Force be with you

In Section Seekers of Perl Wisdom