Pushing a delimiter into an array?

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

Hi!,
I want to push scalar values into an array and put a 'tab' as delimiter between them. Line is long and I have to put many 'tab'. Can I also push "\t" between values without typing between each value? Is there another way that Monks would suggest? Thank you.

push (@array, $value1, "\t", $value2, "\t", $value3,...)

or something similar to the following awk OFS command

awk '{OFS="\t"; print $1,$2,$3,$5,$4}'

Comment on Pushing a delimiter into an array? Select or Download Code

Replies are listed 'Best First'.
Re: Pushing a delimiter into an array? by iguanodon (Priest) on Mar 31, 2014 at 01:56 UTC
Do you really need the tabs in the array? If you just want to print the values separated by tabs do `print join("\t", @array);` [download]	[reply] [d/l]
Re^2: Pushing a delimiter into an array? by rnaeye (Friar) on Mar 31, 2014 at 02:18 UTC
Great advice thanks. I just needed to print them!	[reply]
Re: Pushing a delimiter into an array? by NetWallah (Canon) on Mar 31, 2014 at 02:56 UTC
You could also use perl's $LIST_SEPARATOR $" (see perldoc perlvar). `perl -E 'my @x=0..5; local $"=qq\|\t\|; say "@x"' 0 1 2 3 4 5` [download] Slightly more dramatic: `perl -E 'my @x=0..5; local $"=qq\|= \t =\|; say "=@x="' =0= =1= =2= =3= =4= =5=` [download] What is the sound of Perl? Is it not the sound of a wall that people have stopped banging their heads against? -Larry Wall, 1992	[reply] [d/l] [select]
Re: Pushing a delimiter into an array? by 2teez (Vicar) on Mar 31, 2014 at 06:11 UTC
..something similar to the following awk OFS* command..* That would be perl's $OUTPUT_FIELD_SEPERATOR i.e $,. It works similar to $", except that you don't have to interpolated your array values in a double-quoted string. If you tell me, I'll forget. If you show me, I'll remember. if you involve me, I'll understand. --- Author unknown to me	[reply]