in reply to Regex problem

Maybe the following would be more useful:

my @fields = split("\t", $_, -1);

Then you can perform checks on individual fields, if you want. It'll be more readable and maintainable.