use strict; use warnings; package noname1; our $wibble = 'Hello World'; 1; #### use strict; use warnings; BEGIN { require "./noname1.pm"; } print $noname1::wibble; #### Hello World #### use strict; use warnings; use noname1; print $noname1::wibble;
## use strict; use warnings; BEGIN { require "./noname1.pm"; } print $noname1::wibble; ##
## Hello World ##
## use strict; use warnings; use noname1; print $noname1::wibble;