|
Lines 320-325
sub build_command_message {
Link Here
|
| 320 |
foreach my $key ( keys %$parameters ) { |
320 |
foreach my $key ( keys %$parameters ) { |
| 321 |
unless ( $parameters->{$key} ) { |
321 |
unless ( $parameters->{$key} ) { |
| 322 |
unless ( $optional{$key} ) { |
322 |
unless ( $optional{$key} ) { |
|
|
323 |
$key =~ s|_|-|g; # options of this script have hyphens |
| 323 |
say "$key is required for $message"; |
324 |
say "$key is required for $message"; |
| 324 |
return; |
325 |
return; |
| 325 |
} |
326 |
} |
| 326 |
- |
|
|