http://www.perlmonks.org?node_id=286074


in reply to Re: print datafields separated by tab
in thread print datafields separated by tab

Hi davido,

This is wrong in (at least) 2 regards. Firstly, the syntax is wrong in the while loop. What you needed was

while (my $line = <STDIN> ) {

Secondly, chomp does not return what you think it does. It returns the number of characters it removes, in your case 1 for each iteration. So your final result will be like

1    1    1

Hope this helps

thinker