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