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


in reply to printing out tabs between each element in an array

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

-- Frank