|
发表于 2006-8-11 16:24:29
|
显示全部楼层
Post by strchi
my $bindlogdir = "xxxx/log";
opendir(DIR, "$bindlogdir") || die "Cannot open dir $bindlogdir\n";
my @files = readdir(DIR);
foreach my $filename (@files)
{
$filename =~ /^[\.]/ && next;
print $filename;
}
如上。这句话用来答印文件名。
但是我看不懂“~ /^[\.]/ && next”是什么意思,那位明白能告诉一下我么;
我老是看到一堆符号这么写就头大了。。。。这是哪门子的写法呢? =~应该连在一起看,是模式匹配的操作符.后面的/^[\.]/中的两个/中间应该是匹配的字符,首字符是^应该是串首的意思,后面的[\.]应该是匹配字符,其中\是转义字符,所以这一句应该是以.为首字符的字符串,&&next是:&&是与的意思,next是否是循环语句?
上面是我的分析,我觉得这句好象有点毛病(也许我是错的),唉我也是刚学perl,基于没法入门... |
|