Select Code to Download

sub foo { shift->bar('foo', @_)) }

{
   my $x = $x;
   ...
}

f($i, --$i, $i);