X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FUser%2Fgrent.pm;h=d9581d8aa8445a95dc03649196c5fa1b51782578;hb=5a35688369fffaf661c919710f783712ba978b59;hp=e4e226d119ac6355f3c8f1728d96d3c414a05e11;hpb=ae83f3772b2dd371e676035c6714025e89d7e08f;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/User/grent.pm b/lib/User/grent.pm index e4e226d..d9581d8 100644 --- a/lib/User/grent.pm +++ b/lib/User/grent.pm @@ -1,9 +1,11 @@ package User::grent; use strict; +use 5.006_001; +our $VERSION = '1.00'; +our(@EXPORT, @EXPORT_OK, %EXPORT_TAGS); BEGIN { use Exporter (); - use vars qw(@EXPORT @EXPORT_OK %EXPORT_TAGS); @EXPORT = qw(getgrent getgrgid getgrnam getgr); @EXPORT_OK = qw($gr_name $gr_gid $gr_passwd $gr_mem @gr_members); %EXPORT_TAGS = ( FIELDS => [ @EXPORT_OK, @EXPORT ] );