$langhash{'dígito verificador incorrecto.'} = 'digit incorrect.';
my $string = '(5/4/07 4:24:03 PM CDT) 1473721:   ##   dígito verificador incorrecto. ##pp';  
if( $string =~ s/##\s*([^#]+\.)\s*##/##$langhash{$1}##/ ){  
   print "|$langhash{$1}|\n";
   print "|$1|\n";
   print $string;
}