#!/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";