S
sm
Hi Folks,
How can I access some of the variables in my perl script from a perl module.
example
#!/usr/bin/perl
use this_pakage;
my $VARA = 72;
my $VARB = 44;
this:akage::get_vara_value();
#end
===================
this_package.pm
....
............
sub get_vara_value {
my $AAA = $main::$VARA; ## how do I access $VARA in my script
print $AAA \n";
}
Regards,
-sm
How can I access some of the variables in my perl script from a perl module.
example
#!/usr/bin/perl
use this_pakage;
my $VARA = 72;
my $VARB = 44;
this:akage::get_vara_value();
#end
===================
this_package.pm
....
............
sub get_vara_value {
my $AAA = $main::$VARA; ## how do I access $VARA in my script
print $AAA \n";
}
Regards,
-sm