@array = ("foo", "bar"); $foo, bar) = @array; [download]
In reply to Yet another perl bug (the right one) by dmql