Perl 的两个正则表达式匹配
08月 25th, 2008 ychen Posted in 未分类 |
Email：~m/\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*/
URL：~m/[a-zA-z]+:\/\/[^\s]*/
$&表示匹配到的变量
课题是：如何自动用perl分析网页中的email和url。
我想再加个手机号码，嘿嘿。这些信息应该有用。
想象一下，如果我有100万email地址，我会用来干嘛呢？
08月 25th, 2008 ychen Posted in 未分类 |
Email：~m/\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*/
URL：~m/[a-zA-z]+:\/\/[^\s]*/
$&表示匹配到的变量
课题是：如何自动用perl分析网页中的email和url。
我想再加个手机号码，嘿嘿。这些信息应该有用。
想象一下，如果我有100万email地址，我会用来干嘛呢？
Leave a Reply