Perl reference 筆記

兩種建立 reference 方法

1. 利用 \

$aref = \@array;
$href = \%hash;
$sref = \$scalar;

2. 用 [ item ] 產生匿名陣列或 { item }產生匿名 hash

$aref = [ 1, "string", udef, 13 ];
$href = { Arp => 4, Aug => 8 };
$emptyaref = [ ];  #產生空的陣列參考
$emptyhref = { };  #產生空的 hash 參考

如何使用 reference

@a  等同 @{$aref}
$a[3] 等同  ${$aref}[3]    等同  $aref->[3]
%b  等同  %{$href}
$b{'key'}  等同  ${$href}{'key'}   等同   $href->{'key'}

槽狀陣列
@a = ( [1, 2, 3], [4, 5, 6], [7, 8, 9] );
print $a[1]->[2];  結果為 6
print $a[0]->[1];  結果為 2
其實就是 $a[ROW]->[Column];
※ $a[ROW]->[COLUMN] 又能簡寫為 $a[ROW][COLUMN]