my $pg_author  = "<etext author>";
   my $pg_title   = "<etext title>";
   my @pg_header  = "<Project Gutenberg Header>";
   my @etext_body = "<actual body of etext>";
   my @pg_footer  = "<Project Gutenberg Footer>";