Re: access to the variable in other pm

make sure your module 1 exports the symbol you want

if say..
main.cgi is doing

use TEST1;
use TEST2;
[download]

and TEST1.pm is exporting $dbaccess as...

package TEST1;

use vars qw{$VERSION @ISA @EXPORT @EXPORT_OK};
require Exporter; @ISA = qw(Exporter); 
@EXPORT = qw($dbaccess);  # just to calling package !
$VERSION = '0.01';
use strict; 

my $dbaccess= 'whatever';
[download]

then TEST2.pm would...

$main::dbaccess->prepare('yo 5h1+3');

#or .. 

$TEST1::dbaccess->prepare('yo 5h1+3');


# play around.
[download]

Comment on Re: access to the variable in other pm Select or Download Code

Replies are listed 'Best First'.
Re^2: access to the variable in other pm by blazar (Canon) on Feb 03, 2006 at 11:50 UTC
make sure your module 1 exports the symbol you want Well, not necessarily: he may write accessory subs to be used like methods and call them... ehm, like methods. This may be either an overkill or The Best Way™ depending on the actual purpose, scope and aim of his code. But indeed your suggestion is more akin to what the OP actually asked. As a side note, I'd just add `use base 'Exporter'; our @EXPORT = qw($dbaccess); # hey, I always C<use strict;> at the ve +ry top!` [download] as another, fundametally identical - but somewhat more modern, "WTDI".	[reply] [d/l]

Replies are listed 'Best First'.

Re^2: access to the variable in other pm
by blazar (Canon) on Feb 03, 2006 at 11:50 UTC

make sure your module 1 exports the symbol you want

Well, not necessarily: he may write accessory subs to be used like methods and call them... ehm, like methods. This may be either an overkill or The Best Way™ depending on the actual purpose, scope and aim of his code. But indeed your suggestion is more akin to what the OP actually asked. As a side note, I'd just add

use base 'Exporter';
our @EXPORT = qw($dbaccess);  # hey, I always C<use strict;> at the ve
+ry top!
[download]

as another, fundametally identical - but somewhat more modern, "WTDI".

[reply]
[d/l]