多分定番なんだろうけれど。

perlにて、配列が巨大になるのが間違いない場合、先に

$#変数 = 末尾のインデックス

として、あらかじめ領域を確保すると良い。
いやその、速度が気になるようだったら後から対策すりゃ良いやと思って、空の配列にちまちま push() してたら、途中で Out of Memory!とか言われちゃって。