for $i ( 1 .. 1000) {
     $AoA[$i] = [ somefunc($i) ];
 }