Perl module: Difference between revisions

Revision as of 22:23, 16 February 2010

Revision as of 22:24, 8 June 2010

Line 289:

package Sp1;

our $sp1aVar = 'aa';

print "$main::mainVar\t$sp1Varsp1aVar\n"; # note mainVar needs qualifying

package Sp2;

our $sp2aVar = 'aaa';

print "$main::mainVar\t$Sp1::sp1aVar\t$spa2Varsp2aVar\n";# note mainVar and sp1aVar need qualifying

package main;

print "$mainVar\t$Sp1::sp1aVar\t$Sp2::sp2aVar\n"; # note sp1aVar and sp2aVar need qualifying