Как из двух регулярных выражений сделать одно (простой пример)

Только не таким способом естественно!!!

#!/usr/local/bin/perl

$str = "2005-03-04_12:00";

$str =~ s/[-:]//g;   # regex 1

print $str . "\n";

$rx1 = qr#-#;
$rx2 = qr#:#;
$rx3 = qr#$rx1|$rx2#;

$str =~ s/$rx3//g;

Спасибо за solution :))))

че, товарищи из крутой IT-индустрии сказали что перл тоже рулит?