$scalar_ref = *variable{SCALAR} # igual a $scalar_ref = \$variable $array_ref = *variable{ARRAY} # igual a $scalar_ref = \@variable $hash_ref = *variable{HASH} # igual a $scalar_ref = \%variable $sub_ref = *variable{CODE} # igual a $scalar_ref = \&variable
Podemos usar esta sintáxis para acceder a la entrada de fichero del ''typeglob'':
$handle_ref = *variable{IO}Veamos un ejemplo con el depurador:
DB<1> $a = 4; @a = 1..5 DB<2> $rsa = *a{SCALAR} DB<3> x $rsa 0 SCALAR(0x8450e04) -> 4 DB<4> open a, "matrixP.pl" DB<5> $rfa = *a{IO} DB<6> x $rfa 0 IO::Handle=IO(0x847db4c) DB<7> $b = <$rfa> DB<8> p $b #!/usr/bin/perl -w
$h = *$t{HASH};¿Cuál es el tipo de
$t
? ¿Que queda en $h
?Casiano Rodríguez León