+AUTHORS Contact info for contributors
Artistic The "Artistic License"
Changes Differences from previous version
Changes5.000 Differences between 4.x and 5.000
EXTERN.h Included before foreign .h files
INSTALL Detailed installation instructions
INTERN.h Included before domestic .h files
+MAINTAIN Who maintains which files
MANIFEST This list of files
Makefile.SH A script that generates Makefile
objXSUB.h Scoping macros for Perl Object in extensions
eg/who A sample who program
eg/wrapsuid A setuid script wrapper generator
emacs/cperl-mode.el An alternate perl-mode
+emacs/e2ctags.pl etags to ctags converter
emacs/ptags Creates smart TAGS file
embed.h Maps symbols to safer names
embed.pl Produces embed.h
ext/B/TESTS Compiler backend test data
ext/B/Todo Compiler backend Todo list
ext/B/byteperl.c Bytecode runner
+ext/B/defsubs.h.PL Generator for constant subroutines
ext/B/ramblings/cc.notes Compiler ramblings: notes on CC backend
ext/B/ramblings/curcop.runtime Compiler ramblings: notes on curcop use
ext/B/ramblings/flip-flop Compiler ramblings: notes on flip-flop
hints/fps.sh Hints for named architecture
hints/freebsd.sh Hints for named architecture
hints/genix.sh Hints for named architecture
+hints/gnu.sh Hints for named architecture
hints/greenhills.sh Hints for named architecture
hints/hpux.sh Hints for named architecture
hints/i386.sh Hints for named architecture
t/lib/anydbm.t See if AnyDBM_File works
t/lib/autoloader.t See if AutoLoader works
t/lib/basename.t See if File::Basename works
+t/lib/bigfloat.t See if bigfloat.pl works
+t/lib/bigfloatpm.t See if BigFloat.pm works
t/lib/bigint.t See if bigint.pl works
t/lib/bigintpm.t See if BigInt.pm works
t/lib/cgi-form.t See if CGI.pm works
open PATCHLEVEL,"<patchlevel.h" or die;
my @patchlevel_h = <PATCHLEVEL>;
close PATCHLEVEL;
-my $patchlevel_h = join "", grep { /^#define/ } @patchlevel_h;
+my $patchlevel_h = join "", grep { /^#\s*define/ } @patchlevel_h;
print $patchlevel_h;
-$patchlevel = $1 if $patchlevel_h =~ /PATCHLEVEL\s+(\d+)/;
-$subversion = $1 if $patchlevel_h =~ /SUBVERSION\s+(\d+)/;
+$patchlevel = $1 if $patchlevel_h =~ /PERL_VERSION\s+(\d+)/;
+$subversion = $1 if $patchlevel_h =~ /PERL_SUBVERSION\s+(\d+)/;
die "Unable to parse patchlevel.h" unless $subversion >= 0;
$vers = sprintf("5.%03d", $patchlevel);
$vms_vers = sprintf("5_%03d", $patchlevel);