Pushing a delimiter into an array?

[rnaeye]

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}'

[iguanodon]

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);

[rnaeye]

Great advice thanks. I just needed to print them!

[NetWallah]

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

Slightly more dramatic:

perl -E 'my @x=0..5; local $"=qq|= \t =|; say "=@x="'
=0=      =1=      =2=      =3=      =4=      =5=

[2teez]

..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.