cargar_configuracion_legacy debe enviar un valor por defecto aún cuando la clave no exista

[VTacius]

... lo que se había intentado con las mejores intenciones del mundo, pero en la forma actual sólo hace eso si es que no valor asociado a la clave, pero si la clave misma no existe, no pasa nada

sub cargar_configuracion_legacy {
    ...
    while (my $fila = <$contenido>){
        if ($fila =~ /^(INSTITUCION|FONDO_COMPRA|INW|SRW)\=\"?(.+?)(\"|$)/){
            my $clave = $1;
            my $valor = $2;
            $valor =~ s/"$//g;
            $valor = (length($valor)>0) ? $valor : "Información no disponible";
            $configuracion_legacy{$clave} = $valor;
        }
    }
    ...
    return %configuracion_legacy;
}