By default turned on if normalisation file has C<marc*> directives. You can disable lint
messages with C<--no-marc-lint>.
+=item --marc-xml
+
+Creeate MARCXML file (this can be quite large)
+
=item --marc-dump
Force dump or input and marc record for debugging.
my $validate_path;
my $validate_delimiters_path;
my $marc_generate = 1;
-my $marc_lint = 1;
+my $marc_lint = 0;
my $marc_dump = 0;
+my $marc_xml = 0;
my $parallel = 0;
my $only_links = 0;
my $merge = 0;
"marc-generate!" => \$marc_generate,
"marc-lint!" => \$marc_lint,
"marc-dump!" => \$marc_dump,
+ "marcxml!" => \$marc_xml,
"parallel=i" => \$parallel,
"only-links!" => \$only_links,
"merge" => \$merge,
my $input_db = new WebPAC::Input(
module => $input_module,
limit => $limit || $input->{limit},
- offset => $offset,
+ offset => $offset || $input->{offset},
recode => $input->{recode},
stats => $stats,
modify_records => $input->{modify_records},
mkpath $out_marc unless -e $out_marc;
$marc = new WebPAC::Output::MARC(
- path => "$out_marc/${database}-${input_name}.marc",
+ path => "$out_marc/${database}-${input_name}",
lint => $marc_lint,
dump => $marc_dump,
+ marcxml => $marc_xml,
);
}