in reply to regex bug in perl 5.8.7

This example crashes for me with ActivePerl build 819, which is Perl 5.8.8


TGI says moo