mirror of https://github.com/ecmwf/eccodes.git
Scripts: Add -c option to specify the contact ID
This commit is contained in:
parent
cf3c38ba22
commit
bde94ea29a
|
@ -27,15 +27,17 @@ use Getopt::Long;
|
||||||
my $SANITY_CHECK = 0;
|
my $SANITY_CHECK = 0;
|
||||||
my $WRITE_TO_FILES = 0;
|
my $WRITE_TO_FILES = 0;
|
||||||
my $WRITE_TO_PARAMDB = 0; # Be careful. Fill in $contactId before proceeding
|
my $WRITE_TO_PARAMDB = 0; # Be careful. Fill in $contactId before proceeding
|
||||||
|
my $contactId; # JIRA issue ID
|
||||||
|
|
||||||
# Process arguments. Must be at least one file
|
# Process arguments. Must be at least one file
|
||||||
if (scalar @ARGV < 1) {
|
if (scalar @ARGV < 1) {
|
||||||
&usage;
|
&usage;
|
||||||
}
|
}
|
||||||
my $result = GetOptions (
|
my $result = GetOptions (
|
||||||
"s" => \$SANITY_CHECK,
|
"s" => \$SANITY_CHECK,
|
||||||
"f" => \$WRITE_TO_FILES,
|
"f" => \$WRITE_TO_FILES,
|
||||||
"p" => \$WRITE_TO_PARAMDB
|
"p" => \$WRITE_TO_PARAMDB,
|
||||||
|
"c:s" => \$contactId
|
||||||
);
|
);
|
||||||
|
|
||||||
$ARGV[0] or &usage;
|
$ARGV[0] or &usage;
|
||||||
|
|
Loading…
Reference in New Issue