GetOptions( "Verify=s" => sub { die "ungültiges Argument für Option $_[0]\n" if $_[1] =~ m/^-/; $Verify = $_[1]; }, ) or exit 255;