Resync with mainline

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

diff --git a/lib/Net/servent.pm b/lib/Net/servent.pm
index fb85dd0..c892af0 100644 (file)
--- a/lib/Net/servent.pm
+++ b/lib/Net/servent.pm
@@ -1,9 +1,10 @@
 package Net::servent;
 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(getservbyname getservbyport getservent getserv);
     @EXPORT_OK   = qw( $s_name @s_aliases $s_port $s_proto );
     %EXPORT_TAGS = ( FIELDS => [ @EXPORT_OK, @EXPORT ] );