1. 程式人生 > >perl切片(陣列和雜湊)

perl切片(陣列和雜湊)

切片用法可在陣列和雜湊中提取值

陣列中取陣列

my @array = qw(aa bb cc dd);
my @select = @array[1,3];
print "@select\n";

##輸出
bb dd

雜湊中取值

my %hash = (
    "a" => 1,
    "b" => 2,
    "c" => 3,
    "d" => 4,

);
my @select = @hash{qw(a c)}; ## 提取key為‘a’‘c’對應的值
print "@select\n";
##輸出為
1 3

雜湊中取雜湊

my
%hash = ( "a" => 1, "b" => 2, "c" => 3, "d" => 4, ); my %select = %hash{qw(a c)}; ##提取key為‘a’‘c’的hash map {print "$_=> $select{$_}\n"} keys %select; ##輸出為: a=> 1 c=> 3