Select Code to Download

my $query = new CGI;

...
print $query->end_html;

#End of Program

sub make_entry 
{
...

close PUBFILE;
}