{
local($,, $\) = ("\t", "\n");
print @array;
}

##</code><code>##

print join("\t", @array) . "\n";