Perl学习笔记(3)

• 列表相关

   1。 以@开头的变量为列表变量。给一个变量赋值，如下：
    
    

      @arr =(‘abs’, ‘test’, ‘wang’);
    
    

      空列表不包含元素，定义如下：@empty = ();
    
    

  2.取列表特定的值：
    
    

      $element = @arr(2);
    
    

      Perl中列表计数是从0开始的，因此上述语句为取列表@arr中第三个值。
    
    

      使用方括号（[和]）可以取列表的一个片段（连续的部分）。如果这个片段只有一个元素，那该部分就是
  一个标量片段，该列表变量必须将@改为$。使用方法如下：
    
    

      @arr =(‘abs’, ‘test’, ‘wang’);
    
    

      print $arr[1];     # 输出为: test
    
    

      列表片段可以包含多个元素，也就是说列表的片段也是列表，因此取值时应该使用以@开头的方式。
    
    

      @two = @arr[0,1];  # 输出为: abstest
    
    

      $#arrayname是列表最后一个元素的序号，因此在Perl中我们可以很容易确定列表的元素个数。
    
    

  3.操作列表的函数：
    
    

      push和unshift，push把一个或多个元素添加到列表的尾部。而unshift将元素添加到列表的头部。
  使用方式如下：
    
    

      push(@dest, @scr);
    
    

      push(@dest, $scr);
    
    

      unshift(@dest, @scr);
    
    

      unshift(@dest, $scr);
    
    

      pop和shift操作函数。pop用于从列表尾部删除一个值，shift用于从列表的头部删除一个值。这两个函数
  都返回被删除的值。方式如下：
    
    

      pop @array;  shift @array;
    
    

      splice函数，用于对列表的任意位置添加和删除元素。该函数有四个参数，返回被删除的元素或者列表。
    
    

      参数为: 列表名称，开始位置，删除个数，要插入的元素列表
    
    

      @number = （1, 2, 3, 4, 5）;
    
    

      splice(@number, 3, 1, (9, 10));
    
    

      结果：(1, 2, 3, 9, 10, 5)
    
    

      如果不删除元素，仅仅时添加元素，将第三个参数设置为0即可。
    
    

      如果仅仅时删除元素，则可以省去第四个参数。如：
    
    

      splice(@number, 3, 1);
    
    

      列表中还可以使用x运算符和..，..用于表示一个范围，使用方法如下：
    
    

      (2..6)表示(2, 3, 4, 5, 6)
    
    

  4.应用已有列表。
    
    

  定义新列表时，可以使用已经有的列表，如：
    
    

  @a = (1, 2, 3);
    
    

  @b = (4, @a);      # @b为(4, 1, 2, 3)
    
    

  5.scalar用于强制转化为标量。例如：scalar(@a)输出@a的元素个数。