Lines 54-91
my $marc_mod_template_id = -1;
Link Here
|
54 |
$|=1; |
54 |
$|=1; |
55 |
|
55 |
|
56 |
GetOptions( |
56 |
GetOptions( |
57 |
'commit:f' => \$commit, |
57 |
'commit:f' => \$commit, |
58 |
'file:s' => \$input_marc_file, |
58 |
'file:s' => \$input_marc_file, |
59 |
'n:f' => \$number, |
59 |
'n:f' => \$number, |
60 |
'o|offset:f' => \$offset, |
60 |
'o|offset:f' => \$offset, |
61 |
'h' => \$version, |
61 |
'h' => \$version, |
62 |
'd' => \$delete, |
62 |
'd' => \$delete, |
63 |
't|test' => \$test_parameter, |
63 |
't|test' => \$test_parameter, |
64 |
's' => \$skip_marc8_conversion, |
64 |
's' => \$skip_marc8_conversion, |
65 |
'c:s' => \$char_encoding, |
65 |
'c:s' => \$char_encoding, |
66 |
'v:+' => \$verbose, |
66 |
'v:+' => \$verbose, |
67 |
'fk' => \$fk_off, |
67 |
'fk' => \$fk_off, |
68 |
'm:s' => \$format, |
68 |
'm:s' => \$format, |
69 |
'l:s' => \$logfile, |
69 |
'l:s' => \$logfile, |
70 |
'append' => \$append, |
70 |
'append' => \$append, |
71 |
'k|keepids:s' => \$keepids, |
71 |
'k|keepids:s' => \$keepids, |
72 |
'b|biblios' => \$biblios, |
72 |
'b|biblios' => \$biblios, |
73 |
'a|authorities' => \$authorities, |
73 |
'a|authorities' => \$authorities, |
74 |
'authtypes:s' => \$authtypes, |
74 |
'authtypes:s' => \$authtypes, |
75 |
'filter=s@' => \$filters, |
75 |
'filter=s@' => \$filters, |
76 |
'insert' => \$insert, |
76 |
'insert' => \$insert, |
77 |
'update' => \$update, |
77 |
'update' => \$update, |
78 |
'all' => \$all, |
78 |
'all' => \$all, |
79 |
'match=s@' => \$match, |
79 |
'match=s@' => \$match, |
80 |
'i|isbn' => \$isbn_check, |
80 |
'i|isbn' => \$isbn_check, |
81 |
'x:s' => \$sourcetag, |
81 |
'x:s' => \$sourcetag, |
82 |
'y:s' => \$sourcesubfield, |
82 |
'y:s' => \$sourcesubfield, |
83 |
'idmap:s' => \$idmapfl, |
83 |
'idmap:s' => \$idmapfl, |
84 |
'cleanisbn!' => \$cleanisbn, |
84 |
'cleanisbn!' => \$cleanisbn, |
85 |
'yaml:s' => \$yamlfile, |
85 |
'yaml:s' => \$yamlfile, |
86 |
'dedupbarcode' => \$dedup_barcode, |
86 |
'dedupbarcode' => \$dedup_barcode, |
87 |
'framework=s' => \$framework, |
87 |
'framework=s' => \$framework, |
88 |
'custom:s' => \$localcust, |
88 |
'custom:s' => \$localcust, |
89 |
'marcmodtemplate:s' => \$marc_mod_template, |
89 |
'marcmodtemplate:s' => \$marc_mod_template, |
90 |
); |
90 |
); |
91 |
$biblios ||= !$authorities; |
91 |
$biblios ||= !$authorities; |
92 |
- |
|
|