perl/Tk::Date模块三类功能异常及可靠性咨询

部件创建代码 #

$GUI{time} = $GUI{timeframe}->Date(-value => ‘now’,
                                   -datefmt => ‘%4y  %2m  %2d’,
                                   -timefmt => ‘%2H %2M’,
                                   -check => true)->pack;

遇到的问题 #

• 月份字段输入13时模块会自动修正，但输入14及以上时，部件锁死、耗尽内存并崩溃；
• 输入大于12的小时数值时部件允许保留，仅当输入非法分钟值时才会修正小时；
• 模块官方文档明确标注check函数未完全实现且存在已知Bug。

结论 #

从实际运行故障和官方文档说明来看，Tk::Date模块确实不可靠。

它的输入校验逻辑存在严重缺陷：超范围月份输入直接引发程序崩溃，小时输入校验逻辑混乱，加上核心校验功能check未完成且有已知Bug，这些都说明该模块的稳定性、健壮性不足，不适合用于生产环境。

如果需要Tk环境下的日期时间选择组件，建议选择维护更活跃、校验逻辑完善的替代方案，比如Tk::DateTime类的组件。

内容的提问来源于stack exchange，提问作者Qman