Select Code to Download

#!/usr/bin/perl -T

use strict;
...

# otherwise, print a blank page
print "Content-Type: text/html; charset=utf-8\n\n";