Because the first left parenthesis if taken bij print to form: print(...). As you have found out yourself, you need an extra pair of parenthesis or you need to put a + before your code, like this:

  print +(split "\t", $line)[0], "\n";
[download]

See also print for more information

Paul