added error logging to the searching so that bad zservers can be removed
[zcc.git] / bin / marc-split-xml.rb
blobc2e5adf318a7c4b0efd4453068e7a27352e788fc
1 require 'rubygems'\r
2 require 'marc'\r
3 orig_file = ARGV[0]\r
4 str_len = orig_file.length\r
5 save_dir = orig_file[0,str_len-4]\r
6 puts save_dir\r
7 Dir.mkdir(save_dir)\r
8 records = MARC::Reader.new(orig_file).to_a\r
9 \r
10 records.each_with_index do |obj, i|\r
11   Dir.chdir("#{save_dir}") do \r
12   File.open("#{i}.mrc", "w") do |f|\r
13     f.puts obj.to_marc\r
14   end\r
15   end\r
16 end\r