# Filter not defined values in new_options hashref
$new_options = { map { $_ => $new_options->{$_} } grep { defined $new_options->{$_} } keys %$new_options };
+ $getopt->status( !! $warnings );
$getopt->options( $new_options );
die $warnings if $warnings;