From ca5af986d1148276b5a69aae10e3bae1b4d9dd04 Mon Sep 17 00:00:00 2001
From: Patrick Simianer <p@simianer.de>
Date: Sun, 3 Dec 2017 14:51:01 +0100
Subject: filter-len

---
 filter-len | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100755 filter-len

diff --git a/filter-len b/filter-len
new file mode 100755
index 0000000..c1ec9c1
--- /dev/null
+++ b/filter-len
@@ -0,0 +1,24 @@
+#!/usr/bin/env ruby
+
+require 'zipf'
+
+a = ReadFile.new ARGV[0]
+b = ReadFile.new ARGV[1]
+max = ARGV[2].to_i
+
+a_out = WriteFile.new ARGV[0]+".out"
+b_out = WriteFile.new ARGV[1]+".out"
+
+while line = a.gets
+  line1 = b.gets
+  if line.strip.split.size <= max and line1.strip.split.size <= max
+    a_out.write line
+    b_out.write line1
+  end
+end
+
+a.close
+b.close
+a_out.close
+b_out.close
+
-- 
cgit v1.2.3