code:哈希和循环 (perl snippet)

perl 脚本记录
哈希和循环
$ perl -e '
($t1,$t2) = split ":","test:test2:test3",2; # 使用split进行字符串的切片操作 按:将字符串切片成长度为2的数组并分别符值给$t1和$t2
$t={"1"=>$t1,"2"=>$t2}; # 使用$t1和$t2的值构建哈希表
for $k (keys %{$t}){ # 输出%t中的每一个值
print "$k $t->{$k}\n"
};
'
1 test
2 test2:test3