From b31ace79ea5f6b3f279c544cd3a443d6fbf2a24d Mon Sep 17 00:00:00 2001 From: Patrick Simianer Date: Thu, 26 Feb 2026 10:05:59 +0000 Subject: overhaul --- tsv-uniq | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'tsv-uniq') diff --git a/tsv-uniq b/tsv-uniq index fde79f2..6709e8d 100755 --- a/tsv-uniq +++ b/tsv-uniq @@ -1,6 +1,6 @@ #!/usr/bin/env ruby -require 'set' +require "set" strictness = ARGV[0].to_i # 1 one-side # 2 just the pair @@ -21,14 +21,14 @@ if strictness == 1 seen = Set.new segments[side].each_with_index { |segment,i| if not seen.include? segment - puts "#{segments[i][0]}\t#{segments[i][1]}" + puts "#{segments[0][i]}\t#{segments[1][i]}" end seen << segment } elsif strictness == 2 seen = Set.new segments[0].each_index { |i| - segment_pair = [segments[i][0], segments[i][1]] + segment_pair = [segments[0][i], segments[1][i]] if not seen.include? segment_pair puts "#{segment_pair[0]}\t#{segment_pair[1]}" end @@ -46,4 +46,3 @@ elsif strictness == 3 seen_pairs << segment_pair } end - -- cgit v1.2.3