If you don't want to print a line with a tab and a slash put this in your loop...

print $_ unless ($_ =~ m@^\t\\$@);

If you want to stop printing when you get to a line like that you could use:

last if ($_ =~ m@^\t\\$@);

Edit Changed / to \\

-monkfish (The Fishy Monk)