如何在Perl中检查正则表达式模式是否有效？

发布时间：2020-12-15 23:30:16 所属栏目：大数据来源：网络整理

导读：首先,我想知道是否有某种内置函数可以检查正则表达式模式是否有效.我不想检查表达式是否有效 – 我只是想检查它以确保模式的语法有效 – 如果可能的话. 如果没有内置功能,我该怎么做？我还需要吗？是否有我可以搜索的内置函数/模块的目录,所以我可以避免更

首先,我想知道是否有某种内置函数可以检查正则表达式模式是否有效.我不想检查表达式是否有效 – 我只是想检查它以确保模式的语法有效 – 如果可能的话.

如果没有内置功能,我该怎么做？我还需要吗？

是否有我可以搜索的内置函数/模块的目录,所以我可以避免更多这样的问题？谢谢.

编辑：我应该提一下,我计划根据用户输入动态生成这些模式 – 这就是为什么我要验证它们以确保它们实际运行.

我不是Perl专家,但也许 this可以提供帮助：

#!/usr/bin/perl

my $pattern = "["; # <-insert your pattern here
my $regex = eval { qr/$pattern/ };
die "invalid regex: $@" if $@;

返回这个：

invalid regex: Unmatched [ in regex; marked by <-- HERE in m/[ <-- HERE / at test.pl line 4.

对于你的第二个问题,你可以随时查看CPAN的大量工作.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!