if ($_ =~ m/(\d+)\:(\d+) (\d+)\/(\d+)\/(\d+)/ ){
    $_ =~ s/ /     /;
}

##</code><code>##

if (m/(\d+)\:(\d+) (\d+)\/(\d+)\/(\d+)/ ){
    s/ /     /;
}

##</code><code>##

s/ /   / if  m/(\d+)\:(\d+) (\d+)\/(\d+)\/(\d+)/;

##</code><code>##

s/ /   / if m/\d+\:\d+ \d+\/\d+\/\d+/;