leexurui的专栏

http://blog.csdn.net/wangjiannuaa/article/details/7102587 http://www.php-oa.com/2009/09/16/perl-expect.html 有一种方法是使用EOF fdisk /dev/sda n p 1 1 EOF 因为linux下，EOF （内容）  EOF 

perl变量主要分为三类： 标量、数组和哈希(即关联数组)。perl根据第一个字符来区分变量名 $var  标量变量 @var  数组变量 ： @加上数组名来表示一个数组;Perl中的数组下标是从“0”开始; Perl中的数组元素不必是同一数据类型。@array = (1,2,3,'red'); 使用[]引用数组中第几个元素。$array[0]是1，$array[3] 是'red'。赋值：$