printing out tabs between each element in an array

Win has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: printing out tabs between each element in an array by marto (Cardinal) on Feb 18, 2008 at 13:33 UTC
Strange, You knew how to do it here and here. It would seem that once again, can't you be bothered to read the documentation, super search or try to remember things you have already done. Martin	[reply]
Re: printing out tabs between each element in an array by haoess (Curate) on Feb 18, 2008 at 13:29 UTC
I would like to print out a tab character between each element in the array There is a builtin special variable $": `local $" = "\t"; my @a = qw(1 2 3); print "@a"; __END__ 1 2 3` [download] -- Frank	[reply] [d/l]
Re: printing out tabs between each element in an array by Skeeve (Parson) on Feb 18, 2008 at 13:09 UTC
You might want to look at the join command `join "\t",@cols_for_row;` `s$$([},&%#}/&/]+}%&{});#$&&s&&$^X.($'^"%]=\&(\|?{%` `+`.+=%;.#_}\&"^"-+%*).}%:##%}={~=~:.")&e&&s""`$''`"e	[reply] [d/l] [select]
Re: printing out tabs between each element in an array by McDarren (Abbot) on Feb 18, 2008 at 13:11 UTC
Indeed there is. You can use \t to represent a tab. So probably what you want is something like (untested): `print ARRAY_CONTENTS join("\t", @cols_for_row), "\n";` [download] Update: added newline Cheers, Darren	[reply] [d/l]
Re: printing out tabs between each element in an array by olus (Curate) on Feb 18, 2008 at 13:33 UTC
You can set the `output field separator` to the tab character. `$" = "\t"; print ARRAY_CONTENTS "@cols_for_row\n";` [download] Remember to restore the output field separator to its default value after you're done with the tab formating	[reply] [d/l] [select]
Re^2: printing out tabs between each element in an array by johngg (Canon) on Feb 18, 2008 at 14:15 UTC
Remember to restore the output field separator to its default value after you're done with the tab formating One way to make it difficult to forget is to keep the `local`isation within the `print` statement by using a do block. `print ARRAY_CONTENTS do { local $" = "\t"; "@cols_for_row\n"; };` [download] I hope this is of interest. Cheers, JohnGG	[reply] [d/l] [select]
A reply falls below the community's threshold of quality. You may see it by logging in.
Re: printing out tabs between each element in an array by Anonymous Monk on Feb 19, 2008 at 00:57 UTC
Win, I'd just like to offer my sincere congratulations on achieving 9 xp. That's almost 0.02 xp for every one of your 489 posts. We're all crossing our fingers on you making the 10 xp milestone. Best of luck! - A gutless coward	[reply]
Re^2: printing out tabs between each element in an array by Anonymous Monk on May 23, 2011 at 17:59 UTC
Wow.... I was going to create a user profile; I've found help here a few times. You've scared that right out of me..... umm.... thanks?	[reply]
A reply falls below the community's threshold of quality. You may see it by logging in.


There's more than one way to do things
	PerlMonks