🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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

Re: grepowanie wg listy

#39884
From: primoh
Date: Sat, 30 Oct 2004 12:30
24 lines
1493 bytes
Wlasnie podrozowalem sobie przez Kornwalie... kiedy nagle Szymon Sokół
napisal:

> Najpierw skonstruować regexp pasujący do wszystkich elementów @tab2, a
> potem przyłożyć ten regexp grepem do @tab1:
> 
> $regexp = join("|", map { "\Q$_\E" } @tab2);
> @tab3 = grep(/$regexp/, @tab1);

Swietnie. O to chodzilo.

> I, jeżeli 
> zawartość @tab2 nie zmienia się pomiędzy kolejnymi wykonaniami (np. w
> pętli) tego grepa, to daj opcję wymuszającą jednorazową kompilację
> regexpa: /$regexp/o

W calym skrypcie jest niezmienna, wiec ta opcja sie przyda sie przyda.

Wielkie dzieki za szybka pomoc!

-- 
Pozdrawiam, primoh
"I wish I was home with a big bag of potato chips.  Mmm... potato
chips..." 
Technical Details
Message-ID: <cm01hr$5gg$1@inews.gazeta.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail
References: <clvu7i$oh4$1@inews.gazeta.pl> <clvvpp$rc1$2@galaxy.uci.agh.edu.pl>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail
From: primoh <primoh_wytnij_@gazeta.pl>
Newsgroups: pl.comp.lang.perl
Subject: Re: grepowanie wg listy
Date: Sat, 30 Oct 2004 14:30:53 +0200
Organization: "Portal Gazeta.pl -> http://www.gazeta.pl"
Lines: 24
Message-ID: <cm01hr$5gg$1@inews.gazeta.pl>
References: <clvu7i$oh4$1@inews.gazeta.pl> <clvvpp$rc1$2@galaxy.uci.agh.edu.pl>
NNTP-Posting-Host: staticline2647.toya.net.pl
Mime-Version: 1.0
X-Trace: inews.gazeta.pl 1099139456 5648 217.113.236.39 (30 Oct 2004 12:30:56 GMT)
X-Complaints-To: usenet@agora.pl
NNTP-Posting-Date: Sat, 30 Oct 2004 12:30:56 +0000 (UTC)
X-User: primoh
User-Agent: KNode/0.7.7
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit