死ぬほど簡単な質問でとても申し訳ありません。
いくら調べても分かりませんでした。

PHPで
while(true){
　$a[] = $i;
　$i++;
}
とすれば配列に値がどんどん入ります。
これをperlでコーディングするにはどうすれば良いでしょうか？
どこを見ても、最初に@a = (1,2,3,4);
と最初に配列の初期化をしています。初期化なしでいきなり入れ込む方法を教えて下さい。