Package???

[sanket vaidya]

Hi all,

I am having some questions regarding following codes:

use warnings;

$name = "sanket";
$fred::name = "Fred;

print "In main name = $name\n";

package Fred;
print "Now name = $name";

The output will be as expected:
In main name = sanket
Now name = Fred


Now if I use "strict" then code becomes

use warnings;
use strict;

my $name = "sanket";
$fred::name = "Fred;

print "In main name = $name\n";

package Fred;
print "Now name = $name";

The output is
In main name = sanket
Now name = sanket

why so?

why the out put is not:
In main name = sanket
Now name = Fred

Please help me out.
I am using Active Perl 5.6.2.


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/