3 # regen.pl - a wrapper that runs all *.pl scripts to autogenerate files
5 require 5.004; # keep this compatible, an old perl is all we may have before
8 # The idea is to move the regen_headers target out of the Makefile so that
9 # it is possible to rebuild the headers before the Makefile is available.
10 # (and the Makefile is unavailable until after Configure is run, and we may
11 # wish to make a clean source tree but with current headers without running
16 my $tap = $ARGV[0] && $ARGV[0] eq '--tap' ? '# ' : '';
17 foreach my $pl (map {chomp; "regen/$_"} <DATA>) {
18 my @command = ($^X, '-I.', $pl, @ARGV);
19 print "$tap@command\n";
21 and die "@command failed: $?"