Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    #
    ...
    
    print "$time\n";
    print "$time2\n";
    
  2. or download this
    12:34:56.74
    12:34:56.745768
    
  3. or download this
    $time2 =~ s/^(\d{2})(\d{2})(\d{2})\.(\d{2}).+?/$1:$2:$3.$4/;