PERL函数splice的用法 z

前端之家收集整理的这篇文章主要介绍了PERL函数splice的用法 z前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

PERL函数splice用法

splice有四种用法,分别是:

1.spliceARRAY,OFFSET,LENGTH,LIST

2.spliceARRAY,LENGTH

3.spliceARRAY,OFFSET

4.spliceARRAY

 

说明:移除在ARRAY中由OFFSETLENGTH指定的元素,同时让LIST中的元素代替移除的元素。在列表上下文,函数返回溢出后的数组元素。在标量上下文,返回溢出的最后一个元素,如果无元素移除返回UNDEF

注意:如果OFFSET为负数,则以数组的尾部为起始点。如果省略LENGTH(属于第三种情况),则移除从OFFSET到尾部的元素。如果LENGTH为负数,则除数组尾部LENGTH个元素外,移除从OFFSET到尾部的所有元素。如果OFFSETLENGTH都为空,去移除所有元素。如果OFFSET越界,PERL提示警告并在数组尾部中插入LIST或空。

 

1.spliceARRAY,LIST

 

#!/usr/bin/perl -w

  use strict;
  my @rocks = qw(talc quartz jadeobsidian)tmp (hell oworld;
  splice(@rocks,1tmpforeach ({
        print$_."##"}
  print "\n";

[root@localhost ~]#perl refs.pl

talc##hell##oworld##obsidian##

 

2.spliceARRAY,LENGTH

;

 [root@localhost ~]# perlrefs.pl

 talc##

 

 

3.splice ARRAY,OFFSET

;

 [root@localhost ~]# perlrefs.pl

 talc##quartz##

 

4.splice ARRAY

{
       ;

 [root@localhost ~]# perlrefs.pl

 打印为空

猜你在找的Perl相关文章