Foro - Perl en Español

por **salva** » 2009-12-31 13:41 @612

anush escribiste: Al final utilicé esto en cierta manera para poder introducir un hash en una subrutina con mis posibilidades, es decir, mediante el paso por referencia de un array, que lo conozco.

¿Pero, si entiendes cómo pasar arrays, dónde encuentras la dificultad a la hora de pasar hashes, que se hace exactamente de la misma manera?

my@claves=keys%hash;
my@valores=values%hash;


subrutina(\@claves,\@valores,$elemento);

sub subrutina{
my($claves,$valores,$elemento)=@_;
my@claves=@$claves;
my@valores=@$valores;
my%codigonuevo;
my$i;
for($i=0;$i<scalar(@claves);++$i){
$codigonuevo{$claves[$i]}=$valores[$i];
}
#...
}Coloreado en 0.003 segundos,  usando GeSHi 1.0.8.4

equivale a

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

subrutina(\%hash,$elemento);

sub subrutina{
my($hash_ref,$elemento)=@_;
my%codigonuevo=%$hash_ref;
#...
}Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Foro - Perl en Español

¿Cómo introducir un hash como argumento en una subrutina?

Re: ¿Cómo introducir un hash como argumento en una subrutina?

Publicidad

Re: ¿Cómo introducir un hash como argumento en una subrutina?

¿Quién está conectado?