#!/bin/bash # Copyright 2012 Ken Takusagawa # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation, either version 3 of the License, or # (at your option) any later version. # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # You should have received a copy of the GNU General Public License # along with this program. If not, see . for complexity in `seq 1 4` do # insert complexity for sorting ./x.epi.ll.x $complexity | perl -plwe 's/ / Complexity '$complexity' /' done| sort -g | uniq | # a somewhat hackish way to eliminate duplicates of higher complexity by comparing their decimal representations perl -nlwae 'BEGIN{$val=$complexity="999"}if ($F[0] ne $val){print;$val=$F[0];$complexity=$F[2]}elsif($F[2]==$complexity){print}else{}' | perl -nlwae 'print if $F[0]>1 and $F[0]<13'