Help for this page

Select Code to Download


  1. or download this
    >perl -wMstrict -le
    "my $list = '1, 23-456 7890';
    ...
     printf qq{'$_' } for @digits;
    "
    '1' '2' '3' '4' '5' '6' '7' '8' '9' '0'