our @list=();
for($i=1;$i%2!=0 and $i<1000;$i++) {
print "$i\n";
push (@list, $i); #就是放入数组里是吧？ push就可以了
$i++;
}
print @list;
push ,grep 之类的都可以嘛
#!perl -w
# AUTHOR: niejieqiang
use strict;
print grep{$_%2!=0}0..1000
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024