🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.perl
Article #39780

Re: regex w wielu liniach, mam problem

#39780
From: Maciej Misiak
Date: Mon, 18 Oct 2004 15:38
58 lines
3208 bytes
> $line=~/      ^Job \s                              ([^\n]+)
>         .*?     ^\s\s Job\ Type \s+             : \s ([^\n]+)
>         .*?     ^\s\s Backup\ mode \s+          : \s ([^\n]+)
>         .*?     ^\s\s Job\ Start\ Time \s+      : \s ([^\n]+)
>         .*?     ^\s+ : \s+ Media \s+            : \s ([^\n]+)
>         .*?     ^\s+ Backup\ Last\ Objects? \s+ : \s+ End \s+ ([^\n]+)
>         .*?     ^\s+ Job\ End\ Time \s+         : \s ([^\n]+)
>         .*?     ^\s\s Completed\ Size \s+       : \s ([\d]+) [^\n]*
>         .*?     ^\s\s Failed\ Objects \s+       : \s ([^\n]+)
>         .*?     ^\s\s (Job\ Completed\ Succ?essfully) [^\n]*
>         /xsm;
> 
> Poza tym ja bym przemyslal czy na poczatku kazdej linii oraz miedzy 
dwukropkiem 
> a innymi napisami nie wstawic \s* Zaoszczedzi to bolu glowy, bo trzeba bedzie 
> sie zastanawiac czy np. po Media sa trzy spacje a przed Backup mode dwie czy 
na 
> odwrot.

Aj, errata:
Poza tym ja bym przemyslal czy na poczatku kazdej linii oraz miedzy dwukropkiem 
a innymi napisami nie wstawic \s* Zaoszczedzi to bolu glowy, bo NIE trzeba 
bedzie sie zastanawiac czy np. po Media sa trzy spacje, a przed Backup moZe 
dwie czy na odwrot.

A poza tym wrzuc przykladowego loga na newsy, bo chce sobie wyprobowac takie 
cos:

$smieci='(?:.*\n)*?\s*?';
$dwukropek='\s*?:\s*?';
$line=~/Job\s*(.+)\n
        $smieci
        (?:Job\ Type             $dwukropek (.+)\n)?
        $smieci                  
        (?:Backup\ mode          $dwukropek (.+)\n)?
        $smieci
        (?:Job Start\ Time       $dwukropek (.+)\n)?
        $smieci
        (?:$dwukropek Media      $dwukropek (.+)\n)?
        $smieci
        (?:Backup\ Last\ Objects $dwukropek (.+)\n)?
        $smieci
        (?:Job\ End\ Time        $dwukropek (.+)\n)?
        $smieci
        (?:Completed\ Size       $dwukropek (.+)\n)?
        $smieci
        (?:Failed\ Objects       $dwukropek (.+)\n)?
        $smieci
        (?:(Job\ Completed\ Succ?essfully).*\n)?
        $smieci
        (?:Media $dwukropek Home\\.+? - .+? \\ ([^\n\\]+))?
        /x;

pzdr
Grizzley

-- 
Wysłano z serwisu OnetNiusy: http://niusy.onet.pl
Technical Details
Message-ID: <1d72.00000ac9.4173e369@newsgate.onet.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!news.onet.pl!newsgate.onet.pl!niusy.onet.pl
References: <1d72.00000a9b.4173d684@newsgate.onet.pl>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!news.onet.pl!newsgate.onet.pl!niusy.onet.pl
From: "Maciej Misiak" <grizzleyWYTNIJTO@op.pl>
Newsgroups: pl.comp.lang.perl
Subject: Re: regex w wielu liniach, mam problem
Date: 18 Oct 2004 17:38:18 +0200
Organization: Onet.pl SA
Lines: 58
Message-ID: <1d72.00000ac9.4173e369@newsgate.onet.pl>
References: <1d72.00000a9b.4173d684@newsgate.onet.pl>
NNTP-Posting-Host: newsgate.onet.pl
Mime-Version: 1.0
X-Trace: newsgate.test.onet.pl 1098113898 25258 213.180.130.18 (18 Oct 2004 15:38:18 GMT)
X-Complaints-To: abuse@onet.pl
NNTP-Posting-Date: 18 Oct 2004 15:38:18 GMT
X-Mailer: http://niusy.onet.pl
X-Forwarded-For: 217.153.136.40, 157.25.5.68, 192.168.243.42
X-User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; Maxthon)
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit