Help for this page

Select Code to Download


  1. or download this
    $_=1113333444455;
    $_=reverse; s/(\d{3})/$1_/g; $_=reverse; s/^_//;
    print;
    
  2. or download this
      DB<17>  $_=1113333444455;  m/(\d{3})(?{ print $1 })(?=\d{3})$/
    455