p4raw-id: //depot/perl@13004
package File::Spec::Epoc;
+our $VERSION = '1.00';
+
use strict;
use Cwd;
use vars qw(@ISA);
package PerlIO;
+our $VERSION = '1.00';
+
# Map layer name to package that defines it
my %alias = (encoding => 'Encode');
package encoding;
+our $VERSION = '1.00';
+
use Encode;
sub import {
package integer;
+our $VERSION = '1.00';
+
=head1 NAME
integer - Perl pragma to use integer arithmetic instead of floating point