perl -lne '$s=$_; END{ print "OK" if $s=~/^T/ }' /tmp/foo