in reply to Capturing warnings from Time::Piece
Of course, it might be easier to just remove the trailing 0...
chop($string_to_parse); [download]
or if there's not always an extra digit:
$string_to_parse =~ s/(:\d\d).$/$1/; [download]