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