tyler.durden
/
centreon-plugins
mirror of https://github.com/centreon/centreon-plugins.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

(core) can use variable to defined unitary options (#3938)

This commit is contained in:
qgarnier 2022-09-29 13:25:25 +02:00 committed by GitHub
parent b5033f76e3
commit ddab01fc02
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
centreon-plugins/centreon/plugins/alternative/Getopt.pm
View File

@ -61,17 +61,20 @@ sub GetOptions {
for (my $i = 0; $i < $num_args;) {
if (defined($ARGV[$i]) && $ARGV[$i] =~ /^--(.*?)(?:=|$)((?s).*)/) {
my ($option, $value) = ($1, $2);
# find type of option
if ($search_str !~ /,((?:[^,]*?\|){0,}$option(?:\|.*?){0,}(:.*?){0,1}),/) {
warn "Unknown option: $option" if ($warn_message == 1);
$i++;
next;
}
my ($option_selected, $type_opt) = ($1, $2);
if (!defined($type_opt)) {
${$opts{$option_selected}} = 1;
($num_args, my $assigned) = get_assigned_value(num_args => $num_args, pos => $i, val => $value);
if ($assigned ne '0') {
${$opts{$option_selected}} = 1;
}
} elsif ($type_opt =~ /:s$/) {
($num_args, my $assigned) = get_assigned_value(num_args => $num_args, pos => $i, val => $value);
${$opts{$option_selected}} = $assigned;