Hi, I only need to keep and print $resH, which holds the string after the final 'comparison'

use strict;
if($best_X <= 110 && $block1 <=110 || $best_Y <= 110 && $block2 <= 110
+ ){#keep counts of matches to check for unique match
$counter++;}


if($counter == 1){
$tq = "unique_match"
}elsif($best_X <= 100 && $block1 <= 100){
$pp = "best_match+TE"
}elsif($best_X <= 100 && $position2 < 5){
if($block2 <= 50){
$pp2 = "best_match-TE"}
}else{next}

if($best_Y <= 100 && $block1 >= 70){
$pz = "best_match+TE"
}elsif($best_Y <= 100 && $position1 >= 50){
if($block1 <= 50){
$pz2 = "best_match-TE"}
}else{next}
}
[download]