in reply to Re^2: Missing Bracket
in thread Missing Bracket

I should have tested, but I wasn't really sure what you were trying to achieve? Anyway, this may be it. 

P:\test>perl -Mstrict -wle"print join( '|', @{+{}}{1 .. 366} = ('') x 
+366)"
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
+||||||

[download]
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
Lingua non convalesco, consenesco et abolesco. -- Rule 1 has a caveat! -- Who broke the cabal?
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.

In Section Seekers of Perl Wisdom