Help for this page

Select Code to Download


  1. or download this
    #!/bin/perl -p

s#\D*(\d{3})\D*(\d{3})\D*(\d{4})#(${1}) ${2}-${3}#s;
  2. or download this
    adhjfgl
123ab786YT789034
...
(123) 786-789034
123ab786YT7890bc
1234567890
  3. or download this
    adhjfgl
(123) 786-789034
...
(123) 786-789034
(123) 786-7890bc
(123) 456-7890