Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"my $string = 'ab1b2b3b4d';
...
'ab8b9d' -> all:(a b9 d) -> 2:(b8)
'abxd' -> all:(a bx d) -> 2:()
'ad' -> all:() -> 2:()

c:\@Work\Perl\monks>perl -wMstrict -le
"my $string = 'ab1b2b3b4d';
...
'ab8b9d' -> all:(a b9 d) -> 2:(b8 b9)
'abxd' -> all:(a bx d) -> 2:(bx)
'ad' -> all:() -> 2:()