Select Code to Download

sub out {
  my $x = shift;
...
  my $in2 = sub { ...; my $rs = $in->( $arg ); ... };
  return $x + $in_2->( );
}