Select Code to Download

#!C:/perl/bin/perl.exe
use warnings;
use strict;
...
or die "Can't connect to database\n$DBI::errstr";

# My  code

#!C:/perl/bin/perl.exe
use warnings;
use strict;
...
# My  code

print $cgi->end_html();