Select Code to Download

my @results = foreach (@data) {
    $_ = $_ * 13;
...
    # kind of push(), but how to get the reference
    # to the resulting array?
}

@results = eval {
    my @r;
...
    }
    return(@r);
}