perl中-＞符号意思-arrow

• 调用模块package_name中的sub_name函数

package_name->sub_name();

• 取出hash中键key对应的值

%hash->{key};
%hash->key();
%hash->key;

• 取出数组array中index 0对应的值 

$array->[0]；

 参考资料：

https://blog.csdn.net/u013816205/article/details/51068595

•  perlop

https://perldoc.perl.org/perlref.html

https://stackoverflow.com/questions/4913280/what-does-the-arrow-do-in-perl