【Perl】正则效率测试比较

最新推荐文章于 2025-06-23 14:37:46 发布

原创最新推荐文章于 2025-06-23 14:37:46 发布 · 740 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#perl #测试

本文通过Perl脚本测试了三种不同的正则表达式的效率：[0-9]+、/d+及[0123456789]+。结果显示/d+效率最高，其次是[0-9]+，而明确列出所有数字的正则表达式效率最低。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

前段时间有朋友提出正则[0-9]与/d这两个哪个效率高，因此用如下Perl进行测试

#!/usr/bin/perl -w use Time::HiRes 'time'; $TimesToDo = 1000; $TestString = "42130987241264634" x 10000; $Count = $TimesToDo; $StartTime = time(); while ($Count-- > 0){ $TestString =~ m/^[0-9]+$/; } $EndTime = time(); printf("正则【[0-9]+】 %.3f seconds./n", $EndTime - $StartTime); $Count = $TimesToDo; $StartTime = time(); while ($Count-- > 0){ $TestString =~ m/^/d+$/; } $EndTime = time(); printf("正则【//d+】 %.3f seconds./n", $EndTime - $StartTime); $Count = $TimesToDo; $StartTime = time(); while ($Count-- > 0){ $TestString =~ m/^[0123456789]+$/; } $EndTime = time(); printf("正则【[0123456789]+】 %.3f seconds./n", $EndTime - $StartTime);

测试结果：

正则【[0-9]+】 0.655 seconds.

正则【/d+】 0.359 seconds.

正则【[0123456789]+】 2.413 seconds.