Re: print datafields separated by tab

It looks as though your fieldnames have newlines embedded at the end.

If this is the case,what you want to do is

for (@fieldname){
    chomp; # see perldoc -f chomp
    print "$_\t"; 
}
[download]

though it would be better to chomp fieldname when you put it into @fieldname.

Alternatively, combine the chomp with allolex's join method, and use

print join "\t", map { chomp; $_ } @fieldname;

hope this helps

thinker