...
open GPGFILE, "try.gpg" or die "Couldn't open try.gpg: $!";
my $text = do {local $/; <GPGFILE>};
close GPGFILE;
my $file=$gpg->decrypt_verify($passphrase,$text);
print $file->{text};
...