if ( (scalar (split /\t/)) == 3 ) {
    # Do our stuff
}
else {
    print "Bad data", $_;
}