perl程序 ex_1.pl
<br />perl程序 ex_1.pl<br /> <br />描述 : 该程序会自动检测标准输入流中的内容,如果开头为'zh', 'zH', 'Zh', 'ZH',则匹配成功,打印出OK!和匹配到的内容。<br /> <br />while (<>) {<br /> if ( $_ =~ /^zh/i ) {<br /> print "OK! $&/n";<br /> }<br />}<br /> <br />
原创
2010-07-19 16:49:00 ·
223 阅读 ·
0 评论