GetOptions ("i=s"               => \$input_tbl,
            "ic=s"              => \$input_con_str,    ## defaults to "nzmdsods"
            "o=s"               => \$output_tbl,       ## defaults to "${input_tbl}"
            "oc=s"              => \$output_con_str,   ## defaults to "nzmdsods"
            "u=s"               => \$user,
            "k=s"               => \$key,              ## defaults to "rowid"
            "w=s"               => \$where_condition,  ## defaults to "1=1"
            "n=i"               => \$rec_count,        ## defaults to 1000
            "cfg=s"             => \$config_file,      ## defaults to same name as report file; if specified, overrides
 pii class mapping
            "ld=s"              => \$log_dir           ## defaults to "/Projects/OPScripts/MDS/logs"
           );
.....


print "CED WHERE CONDITION $where_condition\n";
$where_condition = "1=1" if (!$where_condition);
$where_clause = "where $where_condition";
print "CED WHERE CLAUSE $where_clause\n";