Help for this page

Select Code to Download


  1. or download this
    $_ =~ /(\d+)ms/g;
    print "$1,$2,$3\n";
    
  2. or download this
    $_ = "3434 34456... 321ms:543ms:45ms";
    ($d, $e, $f) = ($_ =~ /(\d+)ms/g);
    print "$d,$e,$f\n";