You got the regex wrong, \d matches a digit, 'd' matches letter 'd'. The correct regex should be:

$xronos =~ s/:\d\d 2004//;
[download]