正则表达式验证正确性测试程序

发布时间：2020-12-14 01:34:25 所属栏目：百科来源：网络整理

导读：#perl语言 #!/usr/bin/perl use 5.14.2; use strict; use warnings; while(){ chomp; if(/abc/){ print "matched :|$`$$'|n"; } else{ print "no match: |$_|n"; } }

#perl语言

#!/usr/bin/perl

use 5.14.2; use strict; use warnings; while(<>){ chomp; if(/abc/){ print "matched :|$`<$&>$'|n"; } else{ print "no match: |$_|n"; } }

（编辑：李大同）

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