Resync with mainline

[p5sagit/p5-mst-13.2.git] / lib / Net / netent.pm

diff --git a/lib/Net/netent.pm b/lib/Net/netent.pm
index b82447c..d8c094a 100644 (file)
--- a/lib/Net/netent.pm
+++ b/lib/Net/netent.pm
@@ -1,9 +1,10 @@
 package Net::netent;
 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(getnetbyname getnetbyaddr getnet);
     @EXPORT_OK   = qw(
                        $n_name         @n_aliases
@@ -92,7 +93,7 @@ $n_name if you import the fields.  Array references are available as
 regular array variables, so for example C<@{ $net_obj-E<gt>aliases()
 }> would be simply @n_aliases.
 
-The getnet() funtion is a simple front-end that forwards a numeric
+The getnet() function is a simple front-end that forwards a numeric
 argument to getnetbyaddr(), and the rest
 to getnetbyname().