Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"use Data::Dump qw(pp);
...
regex 1: (?^msx: f [eio]+ e ): match, $1 is 'fiiiie'
string 1: pure string: NO match
regex 2: (?^:pure string): NO match