Select Code to Download

package Keys;
require Exporter;
@ISA=qw(Exporter);
...
use constant PRIVATE_KEY      => 'private key here';

1;

#!/usr/bin/perl
#
...
print "Content-Type: text/html\n\n";
print PRIVATE_KEY."\n";