in reply to regex in perl

*hint* http://perldoc.perl.org/perlintro.html#Simple-matching