From 77ca0c92d2c0e47301d906d355d9ab3afb6f6bcb Mon Sep 17 00:00:00 2001 From: Larry Wall Date: Fri, 24 Sep 1999 14:59:37 -0700 Subject: Re: [PATCH 5.005_61] "our" declarations Message-Id: <199909250459.VAA27506@kiev.wall.org> p4raw-id: //depot/perl@4227 --- pod/perlmod.pod | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'pod/perlmod.pod') 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 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 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 = ''; -- cgit v1.2.1