This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Removed obsolete E32Dll dll entry point which was removed from Symbian SDKs a long...
[perl5.git] / lib / version.pm
CommitLineData
c8d69e4a 1#!perl -w
a7ad731c
HS
2package version;
3
c8a14fb6 4use 5.005_04;
a7ad731c
HS
5use strict;
6
c8a14fb6 7use vars qw(@ISA $VERSION $CLASS *qv);
a7ad731c 8
219bf418 9$VERSION = 0.76;
a7ad731c
HS
10
11$CLASS = 'version';
12
a7ad731c 13# Preloaded methods go here.
c8a14fb6 14sub import {
317f7c8a 15 my ($class) = @_;
c8a14fb6
RGS
16 my $callpkg = caller();
17 no strict 'refs';
18
19 *{$callpkg."::qv"} =
c0b17f21 20 sub {return bless version::qv(shift), $class }
92dcf8ce 21 unless defined (&{"$callpkg\::qv"});
c0b17f21 22
c8a14fb6 23}
a7ad731c
HS
24
251;