sub prepData2 {
    my $refData = shift;
    @$refData = map { log $_ } 1 .. 100;
}