Help for this page
c:\@Work\Perl>perl -wMstrict -MData::Dump -le "my $s = '004abcdefgh009ABCDEFGHIJKLM010nopqrstuvwxyz'; ... dd @captures; " ("004", "abcd", "009", "ABCDEFGHI", "010", "nopqrstuvw")