菜鸟求:Perl语言查找文档字符串,使其全部输出应该怎么写呀?
如题:我的目标字符串都是形如C00011这种形式的,C后面五个数字,我要一个小程序:从“test.txt”中读取字符串,逐个输出匹配的字符串。刚学perl,求大神指点!
[解决办法]
open FILE, "< ", "test.txt";
while( <FILE> )
{
if( m/C\d{5}/ )
{
print $_;
}
}
C12345
C1234
123456
open FILE, "< test.txt";
while( <FILE> )
{
print if /C\d{5}/;
}