projects
/
migration-tools.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
(parent:
938f5d4
)
clean up a bit of noise
author
Galen Charlton
<gmc@esilibrary.com>
Tue, 7 Aug 2012 18:19:00 +0000 (14:19 -0400)
committer
Galen Charlton
<gmc@esilibrary.com>
Tue, 7 Aug 2012 18:19:00 +0000 (14:19 -0400)
Signed-off-by: Galen Charlton <gmc@esilibrary.com>
extract_loadset
patch
|
blob
|
history
diff --git
a/extract_loadset
b/extract_loadset
index
aa29023
..
61326bd
100755
(executable)
--- a/
extract_loadset
+++ b/
extract_loadset
@@
-41,6
+41,7
@@
open MI, '<', $conf->{input} or die "Can't open input file: $!\n";
open MO, '>', $conf->{output} or die "Can't open output file: $!\n";
while (<MI>) {
m/tag="$conf->{tag}".+?<subfield code="$conf->{subfield}">(\d+)</;
+ next unless defined $1;
if ($conf->{reverse}) {
print MO if $exclude{$1};
} else {