Manual integration error in #12235.

[p5sagit/p5-mst-13.2.git] / lib / File / stat.pm

diff --git a/lib/File/stat.pm b/lib/File/stat.pm
index be14fbc..accae9f 100644 (file)
--- a/lib/File/stat.pm
+++ b/lib/File/stat.pm
@@ -1,9 +1,13 @@
 package File::stat;
+use 5.006;
+
 use strict;
+use warnings;
 
-use 5.005_64;
 our(@EXPORT, @EXPORT_OK, %EXPORT_TAGS);
 
+our $VERSION = '1.00';
+
 BEGIN { 
     use Exporter   ();
     @EXPORT      = qw(stat lstat);
@@ -20,7 +24,7 @@ use vars @EXPORT_OK;
 # Class::Struct forbids use of @ISA
 sub import { goto &Exporter::import }
 
-use Class::Struct;
+use Class::Struct qw(struct);
 struct 'File::stat' => [
      map { $_ => '$' } qw{
         dev ino mode nlink uid gid rdev size