Select Code to Download

{
my $returned_data = [ ];
...
  munge_it( $datum );
}
}

my $line_holder = Line::Holding->new( );

routine_wanting_callback( sub { $line_holder->hold( $_[0] ) } );

$line_holder->process_held_lines;