perl 正则匹配多个
2016-12-06 19:26
267 查看
Vsftp:/root# cat k1.pl my $_='upDaTe'; if( $_ =~ /^(SELECT|UPDATE|DELETE|INSERT|SET|COMMIT|ROLLBACK|CREATE|DROP|ALTER|CALL)/i){print "1111111111111\n";}; Vsftp:/root# perl k1.pl 1111111111111
相关文章推荐
- POJ 1611 <并查集>
- remember
- Beautiful Soup学习
- 利用脚本快速修改IP
- 手机号码正则手机号码判断
- 使用STS开发第一个Spring Maven Web项目
- JVM源码---教你傻瓜式编译openjdk7(JAVA虚拟机爱好者必看)
- Flink流处理迭代之化解反馈环
- js莫名失效之总结
- 二十六个月Android学习工作总结
- MongoDB
- perl 正则匹配多个
- 使用POWERDESIGNER设计数据库的20条技巧(转)
- ROS入门3: 创建ROS程序包
- 对BaseFragment的封装
- 最近在做的一些事情
- 电脑usb驱动卸载了怎么办?
- 连接数据库时出现java.lang.ClassNotFoundException: com.mysql.jdbc.Driver怎么修改
- Flex 布局教程:语法篇
- 基于XCode8.x创建ios项目