}
( $optionname => $value );
}
+ grep { $_ !~ /^report_option_/ }
@options;
foreach ( split(',', $cgi->param('taxproductnums') ) ) {
$options{"usage_taxproductnum_$_"} = $value;
}
- foreach ( split(',', $cgi->param('report_option') ) ) {
+ foreach ( $cgi->param('report_option') ) {
$error ||= "Illegal optional report class: $_" unless ( $_ =~ /^\d*$/ );
$options{"report_option_$_"} = 1;
}
'custnum_ref' => \$custnum;
}
- warn "args: ".join('/', @args). "\n";
+ #warn "args: ".join('/', @args). "\n";
@args;