X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FNet%2Fservent.pm;h=63ae3079fe77508d3513634e38a2f5bf31c22907;hb=860599f1563eb187b3ec0b74653ad9a88d0147d0;hp=fb85dd04bfa6a34fae1358def0679ca713b30ece;hpb=8cc95fdbe3687330bd987cea170494b4cd263d90;p=p5sagit%2Fp5-mst-13.2.git

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