Select Code to Download

#!/usr/bin/perl

...
use CGI::Carp qw( fatalsToBrowser );

# Rest of the code

print "Content-type: text-html\n\n";