perl如何删除数组元素.docxVIP

perl 如何删除数组元素 在数组中删除元素，除了可以用 shift po等p 处理一些特殊位置的数据， 一般位置用undef $_等是不行的，虽然值不存在了，但index 依然占用位置。 比如说： @array = (ray, loca, simon,这里ra，y我);们想删除‘ray’这个元素。 用下面的方法：foreach (@array){ if ($_ eq ray){ #undef $_; #$_=; } } foreach(@array){ print $_.ok\n; } 可以证明无论是undef 还是都 是不行的，位置依然存在。 下面列出几种可行的方法： 1. 用grep 函