SELECT '".$Reference."', '".$Comparitor."', A.entity_name 
FROM e_annotation_090812.annotation A 
join e_annotation_090812.Temp_table T on T.Line=A.user
where A.entity_name like '_%'
  and A.evidence_code not like '%_________8__'
  and (A.centre like '".$Reference."' or A.centre like '".$Comparitor."')

##</code><code>##

SELECT '".$Reference."', '".$Comparitor."', A.entity_name 
FROM e_annotation_090812.annotation A 
join e_annotation_090812.Temp_table T on T.Line=A.user
where length(A.entity_name)>0
  and (
     length(A.evidence_code)<12 
     or substring(A.evidence_code,length(A.evidence_code)-2,1)<>'8')
  )
  and (A.centre = '".$Reference."' or A.centre = '".$Comparitor."')

##</code><code>##

my $ST = $DB->prepare(<<EOSQL);
SELECT ?, ?, A.entity_name 
FROM e_annotation_090812.annotation A 
join e_annotation_090812.Temp_table T on T.Line=A.user
where length(A.entity_name)>0
  and (
     length(A.evidence_code)<12 
     or substring(A.evidence_code,length(A.evidence_code)-2,1)<>'8')
  )
  and (A.centre=? or A.centre=?)
EOSQL
$ST->execute($Reference, $Comparitor, ".$Reference.", ".$Comparitor.");