summaryrefslogtreecommitdiff
path: root/merge-ttable
diff options
context:
space:
mode:
Diffstat (limited to 'merge-ttable')
-rwxr-xr-xmerge-ttable34
1 files changed, 34 insertions, 0 deletions
diff --git a/merge-ttable b/merge-ttable
new file mode 100755
index 0000000..ac10903
--- /dev/null
+++ b/merge-ttable
@@ -0,0 +1,34 @@
+#!/usr/bin/env ruby
+
+require 'zipf'
+require 'trollop'
+
+def main
+ conf = Trollop::options do
+ opt :f, "f files", :type => :string, :required => true
+ opt :e, "e files", :type => :string, :required => true
+ end
+
+ f_files = conf[:f].split
+ e_files = conf[:e].split
+
+ h = {}
+ f_files.each_with_index { |fn,i|
+ fa = ReadFile.readlines_strip fn
+ ea = ReadFile.readlines_strip e_files[i]
+ fa.each_with_index { |fw,j|
+ if h.has_key? fw
+ h[fw] << ea[j]
+ else
+ h[fw] = [ea[j]]
+ end
+ }
+ }
+
+ h.each_pair { |f,ea|
+ puts "#{f}\t#{ea.first}"
+ }
+end
+
+main
+