perl語言如何把程序輸出的結果輸入到壹個數組裏面去？菜鳥求助~~~~

for($i=1;$i%2!=0 and $i<1000;$i++) {

print "$i\n";

push (@list, $i); #就是放入數組裏是吧？ push就可以了

$i++;

}

print @list;