here is the code I have so far: 

#!/usr/bin/perl
@cand (63, 66, 69, 72, 73, 74, 95, 96, 98, 134, 135, 137, 138, 139, 14
+0, 159, 162, 172, 173, 175, 177, 178, 197, 198, 201, 210, 225, 232, 2
+37, 240, 243, 246, 247);
open (<CONTACT0>, "Contactmap00_0.txt");
while (<CONTACT0>) {
foreach $c (@cand){
    foreach $_ {
    @line = split (//, $_);
    if $c = $line[2] {
        if $line[4] >= 133 {
            if $line[4] <= 298 {
                if $line[6] != ['Asterisk' 'Colon']{
                    print $_ "\n"; }
                else print "Mismatch at level Type \n";}
            else print "Too large for range\n";}
        else print "To small for range \n";}
    else print "Not a match to candidates\n";}
    }
  }

[download]
My data looks like this 
ILE    105    GLY    404    9.31639356    Blank    Asterisk
ILE    105    VAL    430    7.716578207    Blank    Colon
GLY    106    SER    429    9.615782075    Asterisk    Asterisk
GLY    106    VAL    430    6.799878306    Asterisk    Colon
GLY    106    LEU    433    8.984377971    Asterisk    Colon
GLY    106    SER    434    9.609582172    Asterisk    Asterisk
GLY    107    SER    428    8.263658329    Asterisk    Asterisk
GLY    107    SER    429    6.30787898    Asterisk    Asterisk
GLY    107    VAL    430    4.124362412    Asterisk    Colon
GLY    107    LEU    431    7.670615378    Asterisk    Asterisk
GLY    107    ALA    432    8.308317297    Asterisk    Period
GLY    107    LEU    433    5.934571065    Asterisk    Colon
GLY    107    SER    434    7.71234967    Asterisk    Asterisk
LYS    108    ASN    427    8.67223833    Blank    Asterisk
LYS    108    SER    428    5.458321198    Blank    Asterisk

[download]

In reply to Re^4: Seek and Find by hbrown.bios
in thread Seek and Find by hbrown.bios

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.