foreach my $fred ([1, 3], [2, 4]) { my($i, $j) = @$fred; say $i; say $j; } [download]
In reply to Re: tcl like 1 loop with two operators by JavaFan in thread tcl like 1 loop with two operators by ISAI student