数组 – perl6：数组;摆脱空槽(任何)

发布时间：2020-12-15 21:45:59 所属栏目：大数据来源：网络整理

导读：对于只包含Str元素的Array,我可以使用grep(Str)来消除a：delete之后的空槽; 例如： my @prov_cd = AB BC MB NB NL NS ON PE QC SK;@prov_cd[2]:delete; # Manitoba deleted@prov_cd; # [AB BC (Any) NB NL NS ON PE QC SK]my @prov_cd_cleanup = @prov_cd.gr

对于只包含Str元素的Array,我可以使用grep(Str)来消除a：delete之后的空槽;

例如：

my @prov_cd = <AB BC MB NB NL NS ON PE QC SK>;

@prov_cd[2]:delete;                              # Manitoba deleted

@prov_cd;                                        # [AB BC (Any) NB NL NS ON PE QC SK]

my @prov_cd_cleanup = @prov_cd.grep(Str);        # get rid of (Any) empty slot: [AB BC NB NL NS ON PE QC SK]

@prov_cd = @prov_cd_cleanup;                     # [AB BC NB NL NS ON PE QC SK]

Array可以包含各种对象类型;我宁愿“grep”所有不是(任何)的东西.

我怎样才能做到这一点？

谢谢.

解决方法

首先,请注意,如果您通过 splice而不是：delete删除条目,则项目将被移动,并且不会生成“洞”.

现在,如果你真的想要过滤掉任何,你可以通过

@prov_cd.grep(* !=== Any)

但是,我怀疑你在寻找

@prov_cd.grep(*.defined)

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!