in reply to sprintf and arrays of unknown (in advance) length

Perhaps the baby cart?
my @_a=qw(one two three four damn it shut the door!);

printf "@{[q{'%s' } x @_a]}\n",@_a;

[download]
which would yield 
'one' 'two' 'three' 'four' 'damn' 'it' 'shut' 'the' 'door!'

[download]

In Section Seekers of Perl Wisdom