{ #outer scope $lamb = lambda ( $x, $y, $z ) => sub { $x + $y } } #### my( $x, $y, $z ) = ( 1,2,3 ); my $lamb = do{ my( $x, $y, $z ) = ( $x, $y, $z ); lambda ( $x, $y, $z ) => sub { $x + $y } }