my %file_operations = (
"NokiaExample" => ["aaa", "1111111111"],
"NokiaExample2" => ["bbb", "1111111111"]
);
print $file_operations{"NokiaExample"}[0];
$x = "hello";
@x = (1, 3, 7);
@y = (2, 5, 8);
%x = {'name'=>'haha', age=>33};
print ${*x{SCALAR}}, "\n";
print ${*x{SCALAR}}, "\n";
print @{*x{ARRAY}}, "\n";
print %{*x{HASH}}, "\n";
*x既x这个名字,也叫glob
符号表glob里,*x表示符号表里所有以x为名字的变量。
不,是包括$x, @x, %x, &x, format x, filehandle x等所有的变量的集合。
这里的*x就是glob, *x{SCALAR}是$x的引用。
评论