$xronos =~ s/:\d{2} \d{4}//g; #### substr($xronos,-8) = "";