Or instead of the weird plus, you can just give print its parens:
print((split "\t", $line)[0], "\n");