next if $record[0] eq "TLR";