my $x = [ 4 ];
my $y = $x
++$_ for @x;
say @y;  # 5!!