Select Code to Download

Could not find secret key with KeyID ....

my $mysecring = Crypt::OpenPGP::KeyRing->new(Filename => $CONFIG{priva
+tekey}) or handleError( "Error: ".Crypt::OpenPGP::KeyRing->errstr,1);
my $mypubring = Crypt::OpenPGP::KeyRing->new(Filename => $CONFIG{publi
+ckey}) or handleError( "Error: ".Crypt::OpenPGP::KeyRing->errstr,1);
...
    close FILE;
    }
}