Help for this page
>perl -wMstrict -le "my $s = '79899920179'; ... printf qq{'$_' } for @n; " '79' '89' '99' '201' '79'