将月份缩写转换为Perl中的数字最简单或最有效的方法是什么? (即“jan”到1)

前端之家收集整理的这篇文章主要介绍了将月份缩写转换为Perl中的数字最简单或最有效的方法是什么? (即“jan”到1)前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
如果我导入库以使用方法,是否值得?导入会占用大量内存吗?

解决方法

here借来的
%mon2num = qw(
    jan 1  feb 2  mar 3  apr 4  may 5  jun 6
    jul 7  aug 8  sep 9  oct 10 nov 11 dec 12
);

并检索

$mon2num{"jan"}

猜你在找的Perl相关文章