use strict; use warnings; package x; use Exporter; my $VERSION = 1.00; my @EXPORT = (); my @ISA = qw(Exporter); my $a_template = "a12 a1 a4 a11 a2 a10 a12 a20 a15 a15 a1 a10 a1 a1 a +1 a2 a2 a1 a3 a3 a9 a1 a15 a2"; @EXPORT = qw(xxx $a_template); sub xxx {print "in package x\n";} 1;
In reply to Re^2: global variables defined in an external file
by fionbarr
in thread global variables defined in an external file
by fionbarr
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |