Unless your code is in the same package as the global, you need to give the full package name to access global variables defined by our (also use vars):<br><br>$ cat <a href="http://Foo.pm">Foo.pm</a><br>package Foo;<br><br>
our $GLOBAL;<br><br>sub set_foo { $GLOBAL = 'foo' }<br>1;<br>$ cat <a href="http://Bar.pm">Bar.pm</a><br>package Bar;<br><br>sub set_bar { $Foo::GLOBAL = 'bar' }<br>1;<br>$ cat test.pl<br>#!/usr/bin/perl -w
<br><br>use strict;<br><br>use lib qw(./);<br><br>use Foo;<br>use Bar;<br><br>print "GLOBAL = $Foo::GLOBAL\n";<br><br>Foo->set_foo;<br>print "GLOBAL = $Foo::GLOBAL\n";<br><br>Bar->set_bar;<br>print "GLOBAL = $Foo::GLOBAL\n";
<br>$ perl test.pl<br>Use of uninitialized value in concatenation (.) or string at test.pl line 10.<br>GLOBAL =<br>GLOBAL = foo<br>GLOBAL = bar<br><br><div><span class="gmail_quote">On 3/8/07, <b class="gmail_sendername">
<a href="mailto:nheller@silcon.com">nheller@silcon.com</a></b> <<a href="mailto:nheller@silcon.com">nheller@silcon.com</a>> wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<br>Following is a cut-down version of what I'm trying to do.<br>The problem I'm having is that the variable, $intendedDest, is not holding<br>its value from the called code (in Navigate.pl) to the calling code<br>
(Migrate.pl).<br><br>Can somebody help?<br><br><br># ===== Migrate.pl =====<br><br>#!Perl -w<br><br>use strict;<br>use warnings;<br><br>my $ccDir = $ARGV[0];<br>my $currentLocation = "c:\\ADO_new";<br>require $currentLocation . "\\Navigate.pl";
<br><br>our $intendedDest = 0;<br><br>Nav_to_start::Navigate($ccDir);<br><br><br><br><br># ===== Navigate.pl =====<br><br>package Nav_to_start;<br><br>use Fcntl ':mode';<br><br>BEGIN { }<br><br> sub Navigate {
<br> my $choiceResponse = <STDIN>;<br> chomp($choiceResponse);<br> $intendedDest = $choiceResponse;<br> }<br> return 1;<br>END { }<br><br><br><br><br><br><br><br>> <a href="mailto:nheller@silcon.com">
nheller@silcon.com</a> wrote:<br>>> I'm trying to create a variable that is visible in multiple namespaces.<br>>> I tried declaring the variable using "our".<br>>> With use strict in effect, the code seems to treat the variable as a
<br>>> local<br>>> in each place that it's used. IOW, it doesn't hold value from one<br>>> namespace to the next.<br>>> Can anybody tell me where I'm going wrong?<br>><br>> Can you show us the code which demonstrates what you're trying to
<br>> accomplish?<br>> _______________________________________________<br>> SanFrancisco-pm mailing list<br>> <a href="mailto:SanFrancisco-pm@pm.org">SanFrancisco-pm@pm.org</a><br>> <a href="http://mail.pm.org/mailman/listinfo/sanfrancisco-pm">
http://mail.pm.org/mailman/listinfo/sanfrancisco-pm</a><br>><br><br>_______________________________________________<br>SanFrancisco-pm mailing list<br><a href="mailto:SanFrancisco-pm@pm.org">SanFrancisco-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/sanfrancisco-pm">http://mail.pm.org/mailman/listinfo/sanfrancisco-pm</a><br></blockquote></div><br>