main
pueden ser referidas prefijándolas con
::
; así el programa:
$ cat package_main.pl #!/usr/local/bin/perl5.8.0 -w $a = 4; package toto; $a = 8; $::a = 7; package main; print $a, "\n"; print $toto::a, "\n";produce como salida:
$ ./package_main.pl 7 8Una excepción a esto la constituye las variables especiales como
$_
, @ARGV
, %ENV
, etc.
Estas pertenecen siempre al paquete main.
1 #!/usr/local/bin/perl5.8.0 -w 2 3 package toto; 4 $_ = 7; 5 package main; 6 print; 7 print "\n"; 8 $main::_ = 4; 9 print; 10 print "\n";Da como salida:
$ ./package_specialvars.pl 7 4