If you can store the pass phrase in your perl program you can do the following

my $passphrase = "perl is great!"
open OUT,"|./pgp testMSG.pgp" ;
print OUT "$passphrase\n";
close OUT ;
[download]

good luck
LuCa