#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
use IPC::Cmd qw[can_run run run_forked QUOTE];
use Data::Dumper;

my %conf = (
    exe     => 'gpg2.exe',
);

my $full_path = can_run($conf{exe});
if (defined $full_path) {
    print "verwende Pfad '$full_path'\n";
    my $cmd = $full_path
        .''
    ;
    my @return = run(
        command => $cmd,
#       verbose => 0,
        buffer  =>\my $buffer,
        timeout => 20,
    );
    print Dumper(\@return);
    if (defined $buffer) {
        print "\n\nErgebnis:\n".Dumper(\$buffer);
    }
    else {
        print "Programmstart gescheitert\n";
    }
}
else {
    print "Nicht installiert oder nicht im path\n";
}

verwende Pfad 'C:\Program Files\GNU\GnuPG\pub\gpg2.exe'
$VAR1 = [
          undef,
          'file not found: C:\\Program at C:/strawberry/perl/lib/IPC/Cmd.pm line 1166.
',
          [],
          [],
          []
        ];
Programmstart gescheitert