Help for this page

Select Code to Download

Select or download this

c:\@Work\Perl\monks>perl -wMstrict -le
"my $s = 'xyz1';
...
 print '/\d (?! \d)/ matches' if $s =~ m{ \d (?! \d) }xms;
"
/\d (?! \d)/ matches