The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

$script_base

$script_base --help-all

HEADER

  foreach my $line (@help) {
    print  $fh " " . $line;
  }

  print $fh <<FOOTER;

SEE ALSO

FOOTER

  close $fh;
}