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