免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1898 | 回复: 9

哪位正则大神帮忙看下这个 [复制链接]

论坛徽章:
0
发表于 2013-11-27 20:43 |显示全部楼层
时间: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 泰国 动作  可否有人帮忙 感激不禁

论坛徽章:
0
发表于 2013-11-27 21:13 |显示全部楼层
在linux下

cut -d ':' -f2   filename


回复 1# Crisewng


   

论坛徽章:
0
发表于 2013-11-27 21:16 |显示全部楼层
谢谢 了 不过结果好像不太对,

论坛徽章:
7
戌狗
日期:2013-12-15 20:43:38技术图书徽章
日期:2014-03-05 01:33:12技术图书徽章
日期:2014-03-15 20:31:17未羊
日期:2014-03-25 23:48:20丑牛
日期:2014-04-07 22:37:44巳蛇
日期:2014-04-11 21:58:0915-16赛季CBA联赛之青岛
日期:2016-03-17 20:36:13
发表于 2013-11-28 01:27 |显示全部楼层
看看:
  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. __DATA__
  7. 时间:2005
  8. 国别:泰国
  9. 分类:动作
  10. 语言:泰语
  11. 字幕:中文字幕
  12. 片长:98分钟
  13. 视频尺寸:1280x720
  14. 导演:普拉奇亚·平克尧 Prachya Pinkaew
  15. 主演:托尼·贾 Tony Jaa .....Kham (as Tony Ja)
  16.      阮明智 Johnny Nguyen .....Johnny
  17.      派特察泰·王卡姆劳 Petchtai Wongkamlao ....Inspector Mark (as Mum Jokmok)
  18.      内森·琼斯 Nathan Jones ....TK
  19.      kamlao .....Inspector Mark (as Mum Jokmok)
  20.      Xing Jing .....Madam Rose
  21.      Nathan Jones .....TK
  22.      Bongkoj Khongmalai .....Pla
  23.      David Asavanond .....Rick
  24.      Dean Alexandrou .....Bodyguard
  25.      Tony Chu .....Thug
  26.      Lateef Crowder .....Capoeira Fighter
  27.      Damian De Montemas .....Vincent
  28.      Don Ferguson .....Body Guard
  29.      Jon Foo .....Wu Shu Fighter
  30.      Erik Markus Schuetz .....Jhonny's Bodyguard
  31.      Daniel O'Neill
  32.      Ron Smoorenburg .....Kham's opponent
  33.      David Ussawanon
复制代码

论坛徽章:
7
戌狗
日期:2013-12-15 20:43:38技术图书徽章
日期:2014-03-05 01:33:12技术图书徽章
日期:2014-03-15 20:31:17未羊
日期:2014-03-25 23:48:20丑牛
日期:2014-04-07 22:37:44巳蛇
日期:2014-04-11 21:58:0915-16赛季CBA联赛之青岛
日期:2016-03-17 20:36:13
发表于 2013-11-28 01:53 |显示全部楼层
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. __DATA__
  9. 时间:2005
  10. 国别:泰国
  11. 分类:动作
  12. 语言:泰语
  13. 字幕:中文字幕
  14. 片长:98分钟
  15. 视频尺寸:1280x720
  16. 导演:普拉奇亚·平克尧 Prachya Pinkaew
  17. 主演:托尼·贾 Tony Jaa .....Kham (as Tony Ja)
  18.      阮明智 Johnny Nguyen .....Johnny
  19.      派特察泰·王卡姆劳 Petchtai Wongkamlao ....Inspector Mark (as Mum Jokmok)
  20.      内森·琼斯 Nathan Jones ....TK
  21.      kamlao .....Inspector Mark (as Mum Jokmok)
  22.      Xing Jing .....Madam Rose
  23.      Nathan Jones .....TK
  24.      Bongkoj Khongmalai .....Pla
  25.      David Asavanond .....Rick
  26.      Dean Alexandrou .....Bodyguard
  27.      Tony Chu .....Thug
  28.      Lateef Crowder .....Capoeira Fighter
  29.      Damian De Montemas .....Vincent
  30.      Don Ferguson .....Body Guard
  31.      Jon Foo .....Wu Shu Fighter
  32.      Erik Markus Schuetz .....Jhonny's Bodyguard
  33.      Daniel O'Neill
  34.      Ron Smoorenburg .....Kham's opponent
  35.      David Ussawanon
复制代码

论坛徽章:
8
双子座
日期:2013-08-31 07:37:12金牛座
日期:2013-09-09 18:49:12处女座
日期:2013-09-23 11:43:14处女座
日期:2013-10-09 19:48:21狮子座
日期:2014-03-24 18:22:12丑牛
日期:2014-04-22 22:07:51申猴
日期:2014-06-12 21:54:13双鱼座
日期:2014-06-13 21:52:31
发表于 2013-11-28 02:03 |显示全部楼层
这样?
  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


   

论坛徽章:
0
发表于 2013-11-28 16:37 |显示全部楼层
回复 4# rubyish


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

论坛徽章:
0
发表于 2013-11-28 16:38 |显示全部楼层
回复 6# kernel69


    恩 谢谢 。是这样的

论坛徽章:
0
发表于 2013-11-28 19:05 |显示全部楼层
回复 5# rubyish


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

论坛徽章:
0
发表于 2013-11-29 14:12 |显示全部楼层
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)
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

SACC2019中国系统架构师大会

【数字转型 架构演进】SACC2019中国系统架构师大会,8.5折限时优惠重磅来袭!
2019年10月31日~11月2日第11届中国系统架构师大会(SACC2019)将在北京隆重召开。四大主线并行的演讲模式,1个主会场、20个技术专场、超千人参与的会议规模,100+来自互联网、金融、制造业、电商等领域的嘉宾阵容,将为广大参会者提供一场最具价值的技术交流盛会。

限时8.5折扣期:2019年9月30日前


----------------------------------------

大会官网>>
  

北京盛拓优讯信息技术有限公司. 版权所有 16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122
中国互联网协会会员  联系我们:huangweiwei@it168.com
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP