正则匹配目录问题求教？

apile

用split("/")..再去算array的大小...

大司南

apile，这个用正则怎么来写，能不能赐教

ly5066113

原帖由 大司南 于 2008-4-8 16:28 发表
apile，这个用正则怎么来写，能不能赐教

perl -F/ -anle 'print if $#F <= 3' file

大司南

假如我最后一个字段含有类似http://aaaa.bbbb.cccc
如下:
/a/b/c?url=http://aaaa.bbbb.cccc
这样的怎么处理。。。还请赐教

apile

原帖由 大司南 于 2008-4-8 16:28 发表
apile，这个用正则怎么来写，能不能赐教

不是已经跟你说了..
跟楼楼上写的..差不多..他的是精简版...

1. 
   
2. my @tmp = split("/",$line);
   
3. if(@tmp == 3) #level 2
   
4. {
   
5.    #do
   
6. }elsif(@tmp==4){
   
7. #level 3
   
8. }
   

复制代码

大司南

原帖由 大司南 于 2008-4-8 16:34 发表
假如我最后一个字段含有类似http://aaaa.bbbb.cccc
如下:
/a/b/c?url=http://aaaa.bbbb.cccc
这样的怎么处理。。。还请赐教

？？

hitsubunnu

原帖由 apile 于 2008-4-8 16:34 发表

不是已经跟你说了..
跟楼楼上写的..差不多..他的是精简版...

my @tmp = split("/",$line);
if(@tmp == 3) #level 2
{
   #do
}elsif(@tmp==4){
#level 3
}

我觉得他需要的是

Learning Perl

apile

原帖由 大司南 于 2008-4-8 16:36 发表


？？

在split前先把 ?前面的过滤出来...
$line = s/\?.*$//;
其他的自己解决.....

大司南

OK，谢谢各位