use strict;

my $date = "Date: 10.04.2006";
my $time = "Time: 05:09:31.192";

$time =~ s/\D//g;
my $dt = substr($date, 12, 4).substr($date, 9, 2).substr($date, 6, 2).$time;

print $dt;