#
# 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:
return $actlines. "\n", $tablines. "\n";
}
-
-
-
-
sub my_system {
system(@_);
if ($? == -1) {