projects
/
migration-tools.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
(parent:
33d9fa7
)
xml element in exception file
author
Shawn Boyette
<sboyette@esilibrary.com>
Mon, 22 Sep 2008 19:30:39 +0000 (19:30 +0000)
committer
Shawn Boyette
<sboyette@esilibrary.com>
Mon, 22 Sep 2008 19:30:39 +0000 (19:30 +0000)
yaz-cleanup
patch
|
blob
|
history
diff --git
a/yaz-cleanup
b/yaz-cleanup
index
1450fc3
..
c8f6766
100755
(executable)
--- a/
yaz-cleanup
+++ b/
yaz-cleanup
@@
-23,6
+23,7
@@
open MARC, '<', 'incoming.marc.xml';
open my $NUMARC, '>', 'incoming.clean.marc.xml';
print $NUMARC '<?xml version="1.0" encoding="UTF-8"?>',"\n";
open my $EXMARC, '>', 'incoming.exceptions.marc.xml';
+print $EXMARC '<?xml version="1.0" encoding="UTF-8"?>',"\n";
open MARC2, '<', 'incoming.marc.xml';
<MARC2>;
@@
-81,6
+82,7
@@
while (my $line = getline()) {
}
print $NUMARC "</xml>\n";
+print $EXMARC "</xml>\n";
=head2 edit