2011-04-08 5 views
6

que tiene el código que funciona¿Se pueden hacer referencias sin declarar primero una variable?

my @new = keys %h1; 
my @old = keys %h2; 

function(\@new, \@old); 

pero se puede hacer esto sin tener que declarar variables en primer lugar?

function debe tener sus argumentos como referencias.

+0

¿Por qué no se lo pruebe? – Ingo

+2

Porque realmente no se puede "simplemente probarlo" sin saber qué probar? – cHao

+0

Al menos podría haber intentado reemplazar @new y @old con las expresiones en el RHS. Entonces, si se quejaba Perl, ella podría haber preguntado por qué y cómo prevenirlo. – Ingo

Respuesta

7
use strict; 
use Data::Dumper; 

my %test = (key1 => "value",key2 => "value2"); 
my %test2 = (key3 => "value3",key4 => "value4"); 

test_sub([keys %test], [keys %test2]); 

sub test_sub{ 
my $ref_arr = shift; 
my $ref_arr2 = shift; 
print Dumper($ref_arr); 
print Dumper($ref_arr2); 
} 

Salida:

$VAR1 = [ 
      'key2', 
      'key1' 
     ]; 
$VAR1 = [ 
      'key4', 
      'key3' 
     ]; 
6
function([ keys %h1 ], [ keys %h2 ]); 

De perldoc perlref:

Una referencia a un array anónimo puede ser creado usando corchetes:

$ arrayref = [1, 2, [ 'a', 'b' , 'c']];

Cuestiones relacionadas