Use "our" instead of "my" our $var = "value";
Steve -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Greg Aiken Sent: Monday, July 07, 2008 5:01 PM To: [email protected] Subject: trouble accessing fully qualified $main::variable contents can anyone please explain why when I am in the subroutine, and I attempt to print a variable that's been declared and assigned a value in the main package - why I am unable to print the value of the main package's variable (despite that I am using the fully qualified variable name)? is this my fault or a bug? it seems to work in some instances, but not work in others... ########################################## use strict; use warnings; my $var = "value"; &subroutine; sub subroutine { print "value of main package's main::var is $main::var\n"; } ############ when above program is run, std out shows ############ C:\perlsrc>test.pl Name "main::var" used only once: possible typo at C:\perlsrc\TEST.PL line 9. Use of uninitialized value in concatenation (.) or string at c:\perlsrc\TEST.PL line 9. value of main package's main::var is _______________________________________________ Perl-Win32-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs _______________________________________________ Perl-Win32-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
