exists $uat_tid{$key}?print "$uat_tid{$key}\t":print "No UAT trans id\t";