perl學習 0517

列表的賦值

($fred, $barney) = ($barney, $fred); 交換這兩個變數的值

@ 引用整個數組。

註：將某個數組複製到另一個數組時，仍然算是列表的賦值運算，只不過這些
列表是儲存在數組裡而已。

@copy = @quarry; #將一個數組中的列表複製到另一個數組

pop和push操作符

@array   = 5..9;
$fred    = pop(@array); #$fred 變成9，@array 現在是（5,6,7,8）
$barney  = pop(@array);
pop @array;

push(@array, 0);     #@array現在是（5,6,0）
push(@array, 8);     #@array現在是（5,6,0,8）
push(@array, 1..10); #@array得到了10個新元素
@others = qw/9 0 2 1 0/;
push @array, @others; #@array又得到了5個新元素（共19個）

shift和unshift操作符

對數組的“開頭”進行相應的處理。

 

splice 操作符

字串中的數組插入

foreach控制結構

#foreach $rock(qw/ bedrock slate lava/)
#{
# print "one rock is $rock.\n";
#}

@rocks = qw/ bedrock slate lave /;
foreach $rock(@rocks)
{
 $rock = "\t$rock";
 $rock .= "\n";
}
print "The rocks are:\n", @rocks;

Perl 最喜歡用的預設變數：$_
foreach(1..10)
{
 print "I can count to $_!\n";
}

reverse 操作符