哪位正则大神帮忙看下这个

Crisewng

时间:2005
国别:泰国
分类:动作
语言:泰语
字幕:中文字幕
片长:98分钟
视频尺寸:1280x720
导演:普拉奇亚·平克尧 Prachya Pinkaew
主演:托尼·贾 Tony Jaa .....Kham (as Tony Ja)
     阮明智 Johnny Nguyen .....Johnny
     派特察泰·王卡姆劳 Petchtai Wongkamlao ....Inspector Mark (as Mum Jokmok)
     内森·琼斯 Nathan Jones ....TK
     kamlao .....Inspector Mark (as Mum Jokmok)
     Xing Jing .....Madam Rose
     Nathan Jones .....TK
     Bongkoj Khongmalai .....Pla
     David Asavanond .....Rick
     Dean Alexandrou .....Bodyguard
     Tony Chu .....Thug
     Lateef Crowder .....Capoeira Fighter
     Damian De Montemas .....Vincent
     Don Ferguson .....Body Guard
     Jon Foo .....Wu Shu Fighter
     Erik Markus Schuetz .....Jhonny's Bodyguard
     Daniel O'Neill
     Ron Smoorenburg .....Kham's opponent
     David Ussawanon
现在我想要取出：号后边的那些值2005 泰国 动作  可否有人帮忙 感激不禁

felix0608

在linux下

cut -d ':' -f2   filename


回复 1# Crisewng


   

Crisewng

谢谢 了 不过结果好像不太对，

rubyish

看看:

1. #!/usr/bin/perl
   
2. my $s = do { local $/; <DATA> };
   
3. my @teach = grep chomp, split /^.*:/m, $s;
   
4. print $teach[0], "\n";    # 2005
   
5. print $teach[5], "\n";    # 98分钟
   
6. 
   
7. __DATA__
   
8. 时间:2005
   
9. 国别:泰国
   
10. 分类:动作
    
11. 语言:泰语
    
12. 字幕:中文字幕
    
13. 片长:98分钟
    
14. 视频尺寸:1280x720
    
15. 导演:普拉奇亚·平克尧 Prachya Pinkaew
    
16. 主演:托尼·贾 Tony Jaa .....Kham (as Tony Ja)
    
17.      阮明智 Johnny Nguyen .....Johnny
    
18.      派特察泰·王卡姆劳 Petchtai Wongkamlao ....Inspector Mark (as Mum Jokmok)
    
19.      内森·琼斯 Nathan Jones ....TK
    
20.      kamlao .....Inspector Mark (as Mum Jokmok)
    
21.      Xing Jing .....Madam Rose
    
22.      Nathan Jones .....TK
    
23.      Bongkoj Khongmalai .....Pla
    
24.      David Asavanond .....Rick
    
25.      Dean Alexandrou .....Bodyguard
    
26.      Tony Chu .....Thug
    
27.      Lateef Crowder .....Capoeira Fighter
    
28.      Damian De Montemas .....Vincent
    
29.      Don Ferguson .....Body Guard
    
30.      Jon Foo .....Wu Shu Fighter
    
31.      Erik Markus Schuetz .....Jhonny's Bodyguard
    
32.      Daniel O'Neill
    
33.      Ron Smoorenburg .....Kham's opponent
    
34.      David Ussawanon
    

复制代码

rubyish

or:

1. #!/usr/bin/perl -w
   
2. use 5.018;
   
3. my $s = do { local $/; <DATA> };
   
4. my ( undef, @teach ) = map { chomp; $_ } split /^(.*):/m, $s;
   
5. my %teach = @teach;
   
6. say $teach{'时间'};    # 2005
   
7. say $teach{'导演'};    # 普拉奇亚·平克尧 Prachya Pinkaew
   
8. 
   
9. __DATA__
   
10. 时间:2005
    
11. 国别:泰国
    
12. 分类:动作
    
13. 语言:泰语
    
14. 字幕:中文字幕
    
15. 片长:98分钟
    
16. 视频尺寸:1280x720
    
17. 导演:普拉奇亚·平克尧 Prachya Pinkaew
    
18. 主演:托尼·贾 Tony Jaa .....Kham (as Tony Ja)
    
19.      阮明智 Johnny Nguyen .....Johnny
    
20.      派特察泰·王卡姆劳 Petchtai Wongkamlao ....Inspector Mark (as Mum Jokmok)
    
21.      内森·琼斯 Nathan Jones ....TK
    
22.      kamlao .....Inspector Mark (as Mum Jokmok)
    
23.      Xing Jing .....Madam Rose
    
24.      Nathan Jones .....TK
    
25.      Bongkoj Khongmalai .....Pla
    
26.      David Asavanond .....Rick
    
27.      Dean Alexandrou .....Bodyguard
    
28.      Tony Chu .....Thug
    
29.      Lateef Crowder .....Capoeira Fighter
    
30.      Damian De Montemas .....Vincent
    
31.      Don Ferguson .....Body Guard
    
32.      Jon Foo .....Wu Shu Fighter
    
33.      Erik Markus Schuetz .....Jhonny's Bodyguard
    
34.      Daniel O'Neill
    
35.      Ron Smoorenburg .....Kham's opponent
    
36.      David Ussawanon
    

复制代码

kernel69

这样？

1. $ perl -ne '/^\s+/ ? print : print $st=(split/:/)[1]' a2
   
2. 2005
   
3. 泰国
   
4. 动作
   
5. 泰语
   
6. 中文字幕
   
7. 98分钟
   
8. 1280x720
   
9. 普拉奇亚·平克尧 Prachya Pinkaew
   
10. 托尼·贾 Tony Jaa .....Kham (as Tony Ja)
    
11.      阮明智 Johnny Nguyen .....Johnny
    
12.      派特察泰·王卡姆劳 Petchtai Wongkamlao ....Inspector Mark (as Mum Jokmok)
    
13.      内森·琼斯 Nathan Jones ....TK
    
14.      kamlao .....Inspector Mark (as Mum Jokmok)
    
15.      Xing Jing .....Madam Rose
    
16.      Nathan Jones .....TK
    
17.      Bongkoj Khongmalai .....Pla
    
18.      David Asavanond .....Rick
    
19.      Dean Alexandrou .....Bodyguard
    
20.      Tony Chu .....Thug
    
21.      Lateef Crowder .....Capoeira Fighter
    
22.      Damian De Montemas .....Vincent
    
23.      Don Ferguson .....Body Guard
    
24.      Jon Foo .....Wu Shu Fighter
    
25.      Erik Markus Schuetz .....Jhonny's Bodyguard
    
26.      Daniel O'Neill
    
27.      Ron Smoorenburg .....Kham's opponent
    
28.      David Ussawanon
    
29. $

复制代码

回复 1# Crisewng


   

Crisewng

回复 4# rubyish


    终于等到rubyish 大神了 ，等你等的好久

Crisewng

回复 6# kernel69


    恩 谢谢 。是这样的

神之战戟

回复 5# rubyish


    大神您好，求教个问题 my @teach = grep chomp, split /^.*:/m, $s;
这个地方split /^.*:/m正则表达式后面有没有m，对结果影响很大，我想问下为什么要加m,在什么情况下需要加上m呢？？请您给讲下好吗？谢谢！！！

zwin506

open FMV,"/home/tiger506/Program/Perl/movie" or die "Can not open the file.$!\n";
while(chomp($line=<FMV>)){
        if($line=~m/:/){
                ($key,$value)=split /:/,$line;
                print $value."\n";

        }
}
close FMV;
结果：
bash-4.2$ ./pans_01.pl
2005
泰国
动作
泰语
中文字幕
98分钟
1280x720
普拉奇亚·平克尧 Prachya Pinkaew
托尼·贾 Tony Jaa .....Kham (as Tony Ja)