better error messages when xsubpp fails to find map for a particular

[p5sagit/p5-mst-13.2.git] / lib / User / pwent.pm

diff --git a/lib/User/pwent.pm b/lib/User/pwent.pm
index bb2dace..39bfea4 100644 (file)
--- a/lib/User/pwent.pm
+++ b/lib/User/pwent.pm
@@ -1,9 +1,10 @@
 package User::pwent;
 use strict;
 
+use 5.005_64;
+our(@EXPORT, @EXPORT_OK, %EXPORT_TAGS);
 BEGIN { 
     use Exporter   ();
-    use vars       qw(@EXPORT @EXPORT_OK %EXPORT_TAGS);
     @EXPORT      = qw(getpwent getpwuid getpwnam getpw);
     @EXPORT_OK   = qw(
                        $pw_name   $pw_passwd   $pw_uid