perl 如何每次循环取出@array中一个元素

发布网友发布时间：2022-04-21 00:10

共1个回答

热心网友时间：2023-10-04 16:48

foreach(@all_po) ==> while ($#all_po >=0)

或者chomp(my $aline = shift(@all_po)); ==> $sline=chomp $_;

但看样子程序的功能用个map就可以实现
@aaa= map{chomp} @all_po;

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:11247931@qq.com

产品服务发展历程企业资讯企业文化关于我们加入我们联系我们网站导航网站律师

违法及侵权请联系：TEL:177 7030 7066 E-MAIL:11247931@qq.com 本站由北京市万商天勤律师事务所王兴未律师提供法律服务