package Keys;
require Exporter;
@ISA=qw(Exporter);
@EXPORT_OK=qw(PUBLIC_KEY PRIVATE_KEY);

use warnings;
use strict;

use constant PUBLIC_KEY       => 'public key here';
use constant PRIVATE_KEY      => 'private key here';

1;

##</code><code>##

#!/usr/bin/perl
#
use strict;
use warnings;

use lib "/absolute/path/to/directory/containing/keys/pm/file";
use Keys qw(PRIVATE_KEY PUBLIC_KEY);

use CGI;
print "Content-Type: text/html\n\n";
print PRIVATE_KEY."\n";