}
my @options;
for my $option (@{$options{option}}) {
- my ($key,$name,$majority) = $option =~ /^\s*([^:]+)\s*:\s*(.+?)\s*(?::(\d+))?$/;
+ my ($key,$name,$majority) = $option =~ /^\s*([^:]+?)\s*:\s*(.+?)\s*(?::(\d+))?$/;
$majority //= 1;
push @options,{key => $key,
name => $name,