Classic::Perl is a Perl module that restores some Perl features that have been deleted in the latest versions. By 'classic' we mean as of Perl 5.8.x.
The whole idea is that you can put use Classic::Perl at the top of an old script or module (or a new one, if you like the features that are out of vogue) and have it continue to work.
In versions of Perl prior to 5.10, this module simply does nothing.
SYNOPSIS
use Classic::Perl;
# or
use Classic::Perl 'split';
split //, "smat";
print join " ", @_; # prints "s m a t"
no Classic::Perl;
@_ = ();
split //, "smat";
print join " ", @_;
# prints "s m a t" in perl 5.10.x; nothing in 5.12
use Classic::Perl '$[';
$[ = 1;
print qw(a b c d)[2]; # prints "b"
use Classic::Perl '$*';
$* = 1;
print "yes\n" if "foo\nbar" =~ /^bar/; # prints yes
Product's homepage
Requirements:
· Perl