diff options
| author | Larry Wall <larry@wall.org> | 1999-09-24 14:59:37 -0700 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-09-25 06:44:47 +0000 |
| commit | 77ca0c92d2c0e47301d906d355d9ab3afb6f6bcb (patch) | |
| tree | b60e0c33e2b10b0977fb99fb6da0dcad45134146 /pod/perlmod.pod | |
| parent | 84e30d1a3b7cc368d7f93dd2b009e9fd64756759 (diff) | |
| download | perl-77ca0c92d2c0e47301d906d355d9ab3afb6f6bcb.tar.gz | |
Re: [PATCH 5.005_61] "our" declarations
Message-Id: <199909250459.VAA27506@kiev.wall.org>
p4raw-id: //depot/perl@4227
Diffstat (limited to 'pod/perlmod.pod')
| -rw-r--r-- | pod/perlmod.pod | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/pod/perlmod.pod b/pod/perlmod.pod index 0031d6e0e6..fc81fdfaae 100644 --- a/pod/perlmod.pod +++ b/pod/perlmod.pod @@ -279,7 +279,7 @@ create a file called F<Some/Module.pm> and start with this template: BEGIN { use Exporter (); - use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); + our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); # set the version for version checking $VERSION = 1.00; @@ -294,10 +294,11 @@ create a file called F<Some/Module.pm> and start with this template: # as well as any optionally exported functions @EXPORT_OK = qw($Var1 %Hashit &func3); } - use vars @EXPORT_OK; + our @EXPORT_OK; # non-exported package globals go here - use vars qw(@more $stuff); + our @more; + our $stuff; # initialize package globals, first exported ones $Var1 = ''; |