Quick question. I want to pass a variable to a non-oo module that I
created. But I how do I get the module to contain the value of the
variable that was created in the 'main' namespace. I think there is
something easy that I am not understanding. Example code below.
PROGRAM BEGIN
#!/usr/bin/perl
use HelloWorld;
$var = 'hello world';
printStatement;
exit;
PROGRAM END
MODULE BEGIN
#!/usr/bin/perl
package HelloWorld;
require Exporter;
our @ISA = qw(Exporter);
our @EXPORT = qw(printStatement);
our $VERSION = 1.00;
sub printStatement { print $var; }
1;
MODULE END
THINGS I'VE TRIED BEGIN
I've tried passing in $var to printStatement,
printStatement($var)
in the program
I've tried using the 'main' namespace in the module
print $main::var;
I've tried passing a reference the $var in the module
printStatement (\$var);
THINGS I'VE TRIED END
Executive summary: how do I define a variable in my program and have a
module use that variable definition (in a non-oo module).
Jeff
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
