open(my $pipe, '-|', $impKorr, -cfgfile => $cfgfile, -dbuser => $USER, -dbpassword => $PWD) or do {
  die "failed to spawn process: $!";
};
my @output = <$pipe>; # oder was auch immer man mit der Programmausgabe anfangen will
my $rc = close($pipe) or do {
  die "failed to close process: $!" if ($!);
  $?;
};