Help for this page
#! /usr/bin/perl ... elsif ($nTE2 eq $pp2 || $nTE2 eq $pz2){ $resH = "best_match -TE" }