Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"use 5.010;
...
"
'x aren't y ain't z isn't w won't u 't v daren't t'
'x aren't y ain 't z isn't w won 't u 't v daren 't t'

c:\@Work\Perl\monks>perl -wMstrict -le
"use 5.010;
...
(?msx-i: \b (?: are | is) n (?msx-i: 't ) (*SKIP) (*FAIL) )
'x aren't y ain't z isn't w won't u 't v daren't t'
'x aren't y ain 't z isn't w won 't u 't v daren 't t'