in reply to Re^2: shared variables
in thread shared variables
and change the print statement in test.pl to: print $testlib::var;package testlib; our $var = "Lord only knows if this will work..."; 1;
Now, if you want to do things the recommended way by using a proper module you can do it like this:
# testlib.pm package testlib; use strict; our @EXPORT = qw( $var ); #place all the variables you want to export +by default in here (c.f. @EXPORT_OK) use Exporter; our @ISA = qw(Exporter); our $var = "Lord only knows if this will work..."; 1;
-imran#!/usr/bin/perl -w # test.pl use strict; use CGI::Carp qw(fatalsToBrowser warningsToBrowser); use CGI ':standard'; use testlib; # will automagically import $var into current namespace print "Content-type: text/html\n\n"; print $var; exit;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^4: shared variables
by Anonymous Monk on Mar 14, 2006 at 18:13 UTC |