Select Code to Download

my $buffer;
foosub( \$bufffer );
...
    my $rs_buffer = shift;
    $$rs_buffer = "Hello, world";
}

my $buffer;
foosub( $buffer);
...
    my $buffer = shift;
    $buffer = "Hello, world";
}