Perl didnt allow me to push into an empty array...

Are you sure?

my @stuff;
push @stuff, 'element';
push @stuff, 'elephant';
local $" = ')(';
print "(@stuff)\n";
[download]