🚀 go-pugleaf

a muchos les contestan lo mismo:  google es tu amigo


Miguel Farah ha escrito:

> Estoy trabajando en un programa en Perl. La primera mitad del código
> fuente consiste en muchas declaraciones de variables, como esto:
>
> $padre{"12"}="-23"; $madre{"12"}="-24"; $conyuges{"12"}=",";
> $hijos{"12"}=","; $sexo{"12"}="M"; $nombre{"12"}="Joaquín Bachelet
> Echeñique";
> $padre{"13"}="-25"; $madre{"13"}="-26"; $conyuges{"13"}=",";
> $hijos{"13"}=","; $sexo{"13"}="F"; $nombre{"13"}="Michelle Piñera
> Infante";
> $padre{"14"}="-27"; $madre{"14"}="-28"; $conyuges{"14"}=",";
> $hijos{"14"}=","; $sexo{"14"}="M"; $nombre{"14"}="Sebastián Lavín
> Jeria";
>
> que son generadas automáticamente por un segundo programa (también en
> Perl), que filtra los datos a partir de un archivo .GED entregado como
> input. La segunda mitad consiste en una serie de subrutinas que hacen
> cálculos y rastreos.
>
> Como la segunda mitad del código es esencialmente fija y la primera
> dependerá del archivo inicial y deberá regenerarse cada vez, lo más
> razonable es separar ambas partes en distintos archivos y luego unirlos
> con el equivalente al #include ... el problema es que no sé cuál es
> el
> equivalente en Perl (por otro lado, tengo un tercer programa, en PHP,
> que usa al primero, y para el cual sí tengo el problema resuelto:
> basta
> usar la sentencia include() ).
> 
> ¿Cómo lo hago? ¿Tendré que darme la p*ja de hacer un módulo?