Re^4: Scope and references

[jpl]

Here's a test of understanding. What does the following produce?

use strict;
use Data::Dumper;

my @array;
for (my $i = 0; $i < 5; ++$i) {
  LABEL:
    my @y;
    push(@y, $i);
    push(@array, \@y);
    if ($i & 1) {
        ++$i;
        goto LABEL;
    }
}
print(Dumper(\@array), "\n");

Hint: I failed.

<Reveal this spoiler or all in this thread>