Shell Programming and Scripting

So lets say I have:

1.pl:
$a = 1;
$b = 2;
require "2.pl";

2.pl
print $a;

How to make 1.pl's variables available to 2.pl? Thanks

try, 1.pl:

Code:

$a = 1;
$b = 2;

2.pl:

Code:

require "1.pl";

print $a . "\n";

I know what you're saying and that's not what I want to do. The script represented by 2.pl is a script that prints header information for each page like 1.pl, and from those scripts it needs variables that vary from script to script which require it. I know it looks weird but I have good reason for it.

I think I found a way to do it by doing something like:

Code:

1.pl:
package one;
$one::a = 1;
$one::b = 2;
require "2.pl";

2.pl
print $one::a;

I guess that's the best way to do it?