判断字符串是否只含某些字符

问题：给定几个字符(例如, afsg3)和另一个字符串$str，判断$str是否不包括这几个字符外的其他字符。

($str =~ /^[afsg3]+$/) || print "$str has other char\n";

注意^和$不能少，否则不能达到测试“只包含”的目的。

posted on 2006-03-05 15:47 weidagang2046 阅读(406) 评论(0) 编辑收藏所属分类: Perl


只有注册用户登录后才能发表评论。




网站导航: 博客园博客园最新博文博问管理
相关文章: 统计工程的源代码行数 Perl eval函数探讨如何捕捉CGI程序exception 创建或删除目录 Perl Tips 2006/8/19 删除用通配符匹配的一类文件列出目录下的所有子目录和文件名 perl自带的介绍图形界面的例子 windows 下的system命令的后台运行求助 Perl处理Unix命令输出

weidagang2046的专栏