Help for this page

Select Code to Download

Select or download this

  # Magical export invocation.
  use Exporter;
  @ISA = 'Exporter';
  @EXPORT_OK = qw(genHeader);

Select or download this

  # Body here.
  # Will fill in
...
    my $i = shift;
    print "<VirtualHost $i>\n";
  }