数字IC设计＞＞Perl学习3

（一）数组和列表的操作符

pop操作符：取出数组中最后的元素并且返回该元素的值。

push操作符：添加一个元素或者是一串元素到数组的末尾。

shift操作符：取出数组中最开始的元素并且返回该元素的值。

unshift操作符：添加一个元素或列表到数组的开头。

pop和push都是针对数组的末尾；shift和unshift都是针对数组的开头。

foreach：循环遍历能逐项遍历列表的值，依次迭代。  like

foreach $rock(qw /bedrock slate lava/){

       $rock="\t$rock";

       $rock .="\n";

}

 Foreach 从列表（数组）的第一个元素一直循环执行到最后一个元素，一次迭代一个。控制变量（本例中为$rock）每一次迭代从列表中取出一个新值。第一次为 “ bedrock” ,第三次为 “ lava” 。

当循环结束时$rock 的值为多少呢？其值同循环开始之前相同。foreach 循环中控制变量的值会被 Perl 自动保存和恢复。当循环进行时，是没有办法改变其值的。循环结束时，变量的值会回到循环开始前，如果没有值则为 undef。这意味着如果有一个变量和控制变量有相同的名字：“ $rock” ，不用担心会混淆它们。

控制变量不是这些列表元素中的一个拷贝而是这些元素本身。 也就是说，如果在循环中修改这个变量，那原始列表中的元素也会被修改，如下面代码段所显示:

#! /usr/bin/perl -W
use strict;
my @array = (1 .. 9);
my $num;
foreach $num(@array)

 {

  $num **= 2;
}
print "@array\n";
输出如下：
1 4 9 16 25 36 49 64 81
在这里很重要的一点在于，控制变量$num代表着＠array中的一个特定项目。如在一个foreach结构的主体内修改控制变量的值，会同时改变控制变量当前代表的那个＠array元素。
因此每次执行foreach内的代码时，＠array的当前值都会发生变化。

当循环结束时$rock 的值为多少呢？其值同循环开始之前相同。foreach 循环中控制变量的值会被 Perl 自动保存和恢复。当循环进行时，是没有办法改变其值的。循环结束时，变量的值会回到循环开始前，如果没有值则为 undef。这意味着如果有一个变量和控制变量有相同的名字：“ $rock” ，不用担心会混淆它们。

reverse：读取列表的值，并且按照相反的次序返回该列表。 like

@arrays = reverse @arrays;

sort:读取列表的值，根据字符串的编码顺序，进行排序，ASCII码表。

（二）上下文

上下文指的是表达式所处的位置，Perl解析表达式的时候，要么希望得到是一个标量，要么希望得到是一个列表。表达式所在的位置，Perl期望什么，就是表达式的上下文。

同一个表达式在不同的上下文会有不同的含义。

scalar函数：可以使用scalar函数强制指定标量的上下文。

scalar函数就是将上下文指定为标量上下文。就是一个数值，也就是数组的个数，六个。

scalar函数的返回值是返回标量。