Robert Allerstorfer: PGP über Perl-Script aufrufen

Beitrag lesen

Hi,

gibt es für sowas evt. fertige Perl-module oder approbierten Perl code? Mein versuch, mit PGP 6.5.2 unter WinNT eine datei test.txt zu verschlüsseln, funktioniert zwar direkt am prompt, aber über CGI liefert das folgende perl script

#!D:/Programme/Perl/bin/perl
my $pgp_dir =  "D:\WINNT\Profiles\Administrator\Application Data\PGP";
my $pgp_app =  "pgp.exe";
my $pgp_file = "test.txt";
my $pgp_id = "ANET";
$ENV{PGPPATH} = $pgp_dir;
print "Content-type: text/html\n\n";
print "<html><head><title>Test</title></head><body><tt>\n";
chdir($pgp_dir);
my $pgp_return = $pgp\_app -eat $pgp\_file $pgp\_id;
print "$pgp_return<br>";
print "</tt></body></html>";

die meldung

Recipients' public key(s) will be used to encrypt. Cannot find the public key matching userid 'ANET'

Hm, über CGI möchte PGP also den Public Keyring auf einmal nicht mehr finden - sehr eigenartig.
Also: Funktioniert bei irgendwem PGP über Perl-CGI?

rob.