$dataFile = '/opt/ExportedPGPKeys/SampleData.txt'; $isEncrypted = do{ open my $exec, '-|', qw'pgp -ea +batchmode', $dataFile, @sys or die "PGP pipe failed: $!"; binmode $exec; <$exec>; }; print " The output value is $isEncrypted \n";