摘要: forfor(my $i=0;$i<10;$i++){ print $i;}foreachforeach my $col_id (sort {$a<=>$b;} keys %col_hash){ print $col_hash{$col_id};}while 阅读全文
posted @ 2011-12-21 11:25 zjking99 阅读(5497) 评论(0) 推荐(0) 编辑