From 2b1d7f881c19c4d4b5afae194e02d3300c7675d0 Mon Sep 17 00:00:00 2001
From: Patrick Simianer <p@simianer.de>
Date: Tue, 5 Jul 2016 11:01:46 +0200
Subject: mv

---
 split-kbest | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100755 split-kbest

(limited to 'split-kbest')

diff --git a/split-kbest b/split-kbest
new file mode 100755
index 0000000..ab425b0
--- /dev/null
+++ b/split-kbest
@@ -0,0 +1,24 @@
+#!/usr/bin/env ruby
+
+require 'zipf'
+
+def write_kbest l, fn
+  f = WriteFile.new fn
+  f.write l.join("")
+  f.close
+end
+
+dir = ARGV[0]
+i = 0
+l = []
+while line = STDIN.gets
+  j = line.split.first.to_i
+  if j == 0 && l.size > 0
+    write_kbest l, "#{dir}/#{i}.gz"
+    l = []
+    i += 1
+  end
+  l << line
+end
+write_kbest l, "#{dir}/#{i}.gz" # last one
+
-- 
cgit v1.2.3