perl 如何取出一行中匹配到第2次的字段？

yang-wei

假如我有一行文本： “the first file is abc.jpg the second file is cba.jpg the third file is bac.jpg and"

我现在如何用模式来取出第2个jpg文件的文件名 cba.jpg 呢？

那位兄弟知道的帮帮忙。

[ 本帖最后由 yang-wei 于 2008-3-13 16:09 编辑 ]

yang-wei

原帖由 __lxmxn__ 于 2008-3-13 16:48 发表
my $str='the first file is abc.jpg the second file is cba.jpg the third file is bac.jpg and';
if($str=~/\.jpg.*?(\w+\.jpg)/){
    print 'filename is ',$1;
}

谢谢阿。这个方便。

我当时是用笨的方法，直接把那行打散，放入数组，再把有jpg的放入另外一个数组，然后取出array[1] 的值。

yang-wei

还要再请教下：
1，如何取出倒数第2个jpg的文件名？

2，以及取出所有的jpg文件名？

3，或者任意指定的一个？ 比如第4个，或者第8个？