Help for this page

Select Code to Download


  1. or download this
    >perl -ane "next if $seen{$F[1].$F[2]}++;print" InputFile.txt
    ----------------------------------------------------------------------
    +-------------
    ...
       93  HLA-A*02:05       ELMTLATWV  ELMTLATWV  0  0  0  0  0    ELMTLA
    +TWV X02763_HBe_A_po 0.46686   320.0    2.50
        8  HLA-A*02:05       LIISCTCPT  LIISCTCPT  0  0  0  0  0    LIISCT
    +CPT X02763_HBe_A_po 0.45053   381.9    2.50
      117  HLA-A*11:01       IISCTCPTV  YVNVNMGLK  0  0  0  0  0    YVNVNM
    +GLK AB219428_HBe_B_ 0.62268    59.3    0.40 <= SB
    
  2. or download this
    perl  -ane "next unless not $seen{$F[1].$F[2]}++ or m/^\s*\D/;print" I
    +nputFile.txt