[0]{} Perl> print [ (0) x $_ ] for 1 .. 4;;
ARRAY(0x36fed28)
ARRAY(0x36fecf8)
ARRAY(0x36fece0)
ARRAY(0x36fecc8)
[0]{} Perl> print @{ [ (0) x $_ ] } for 1 .. 4;;
0
0 0
0 0 0
0 0 0 0