From: Jarkko Hietaniemi Date: Wed, 14 Nov 2001 21:24:39 +0000 (+0000) Subject: VERSIONize. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8de1277c4a6863f966e9384b1ffd399300383cf9;p=p5sagit%2Fp5-mst-13.2.git VERSIONize. p4raw-id: //depot/perl@13004 --- diff --git a/lib/File/Spec/Epoc.pm b/lib/File/Spec/Epoc.pm index 036bcca..eec5a1a 100644 --- a/lib/File/Spec/Epoc.pm +++ b/lib/File/Spec/Epoc.pm @@ -1,5 +1,7 @@ package File::Spec::Epoc; +our $VERSION = '1.00'; + use strict; use Cwd; use vars qw(@ISA); diff --git a/lib/PerlIO.pm b/lib/PerlIO.pm index f50cdb3..bb678a6 100644 --- a/lib/PerlIO.pm +++ b/lib/PerlIO.pm @@ -1,5 +1,7 @@ package PerlIO; +our $VERSION = '1.00'; + # Map layer name to package that defines it my %alias = (encoding => 'Encode'); diff --git a/lib/encoding.pm b/lib/encoding.pm index 94ee323..4938bfd 100644 --- a/lib/encoding.pm +++ b/lib/encoding.pm @@ -1,5 +1,7 @@ package encoding; +our $VERSION = '1.00'; + use Encode; sub import { diff --git a/lib/integer.pm b/lib/integer.pm index 998574f..caa1ea6 100644 --- a/lib/integer.pm +++ b/lib/integer.pm @@ -1,5 +1,7 @@ package integer; +our $VERSION = '1.00'; + =head1 NAME integer - Perl pragma to use integer arithmetic instead of floating point