#
# regen_perly.pl, DAPM 12-Feb-04
#
-# Copyright (c) 2004 Larry Wall
+# Copyright (c) 2004, 2005 Larry Wall
#
# Given an input file perly.y, run bison on it and produce
# the following output files:
# the test below to allow that version too. DAPM Feb 04.
my $version = `$bison -V`;
-unless ($version =~ /\b(1\.875|2\.0)\b/) { die <<EOF; }
+unless ($version =~ /\b(1\.875[a-z]?|2\.0)\b/) { die <<EOF; }
You have the wrong version of bison in your path; currently 1.875
or 2.0 is required. Try installing
return $actlines. "\n", $tablines. "\n";
}
-
-
-
-
sub my_system {
system(@_);
if ($? == -1) {