Help for this page

Select Code to Download


  1. or download this
    c:\@Work\Perl\monks>perl -wMstrict -le
    "$_ = '+++1223w3433.45+34***';
    ...
    B: 12 digit grps.;  s/// string unchanged '+++1223w3433.45+34***'
    C: 12 digit grps.;  s/// string unchanged '+++1223w3433.45+34***'
    D: 12 digit grps.;  s/// string CHANGED '+++'