请教 perl 多行文字匹配问题

hustddb

UID: 7537
帖子: 112
积分: 257
在线时间: 17 小时

11^# hustddb 发表于 2009-01-12 09:02

$fan="@output1";
            #@fan=$fan=~ m/^ Fan \d (\w+)/img;
            @fan=$fan =~m/Fan \d+ (\w+)/img;
            $fan1=@fan[0];
            $fan2=@fan[1];
            $fan3=@fan[2];

MMMIX

UID: 31964
帖子: 137
积分: 315
在线时间: 1 天 1 小时

12^# MMMIX 发表于 2009-01-12 09:36

QUOTE:

原帖由 hustddb 于 2009-1-12 09:02 发表
$fan="@output1";
            #@fan=$fan=~ m/^ Fan \d (\w+)/img;
            @fan=$fan =~m/Fan \d+ (\w+)/img;
            $fan1=@fan[0];
            $fan2=@fan[1];
            ...

你好像并不理解"完整"的意思。

ynchnluiti

UID: 39553
帖子: 24
积分: 55
在线时间: 10 分钟

13^# ynchnluiti 发表于 2009-01-12 09:44

QUOTE:

原帖由 hustddb 于 2009-1-12 09:02 发表
$fan="@output1";
            #@fan=$fan=~ m/^ Fan \d (\w+)/img;
            @fan=$fan =~m/Fan \d+ (\w+)/img;
            $fan1=@fan[0];
            $fan2=@fan[1];
            ...

注释语句的正则里使用了^, ^表示匹配开始

请教 perl 多行文字 匹配问题

请教 perl 多行文字匹配问题