Select Code to Download

my $r;
my $s = ...;
...
    $s->get_handles(rtrs=>\@r, vars=>\$v, hosts=>\@h);
    $$r_ref = $r[0];    # dereference $r_ref and write to its referent
    ...