$src =~ /^(....-..-..)T(..:..:..)/ or die;
my $dst = "$1 $2";