#
### atag.sh
###
### Usage:  atag.sh filename term1 [ term2 ]
###
### Look through filename for either
### "term1" or "term1 term2"
###
### Return true if there is not an <\/a> tag
### following term1 and term2.  
### 
###
 

grep $2 $1 | \
sed "s/<\/a>/ <\/a> /g" | \
sed "s/:/ /g" | \
sed "s/)/ /g" | \
sed "s/(/ /g" | \
sed "s/\">/ \"> /g" | \
awk -v key1=$2 -v key2=$3 -W re-interval 'BEGIN {
     FS=" "
     }
     {

     split($0, array, " ")
     pflag=0
     for (i = 0; i <= NF; i++)
     {
         x = i + 1
         if (array[i] == key1)
         {
             if (key2 == "")
             then
             {
                 for (z = x; z <= NF; z++)
                 {
                    if (array[z] == "<a")
                    {
                        pflag=0
                        print pflag
                        exit
                    }
                    if (array[z] == "</a>")
                    {
                        pflag=1
                        print pflag
                        exit
                    }
                 }
             }

             if (array[x] == key2)
             {
                 for (z = x; z <= NF; z++)
                 {
                    if (array[z] == "<a")
                    {
                        pflag=0
                        print pflag
                        exit
                    }
                    if (array[z] == "</a>")
                    {
                        pflag=1
                        print pflag
                        exit
                    }
                 }
             }

         }
    }
    print pflag
}'