Newsgroups: fj.lang.perl
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!news.nc.u-tokyo.ac.jp!newssinet!sinetnews!eclnews!news.ipc.chiba-u!news.tj.chiba-u!asada
From: asada@ics.tj.chiba-u.ac.jp (Takuya Asada)
Subject: Re: {Q} pattern match
Message-ID: <DJAtvA.Isr@ics.tj.chiba-u.ac.jp>
Sender: usenet@ics.tj.chiba-u.ac.jp
Nntp-Posting-Host: icsj6.tj.chiba-u.ac.jp
Organization: Chiba-University
References: <OZAWA.95Dec8135044@cosmos.pe.u-tokyo.ac.jp>
Date: Sat, 9 Dec 1995 03:04:21 GMT
Lines: 20
Xref: galaxy.trc.rwcp.or.jp fj.lang.perl:603
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.perl&nb=603&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

$B$"$5$@$J$N$G$9!#(B

$B>._7$5$s(B> 
> grep((very_complicated_operation, 0), @list);
> $B$J$I$H$d$k$h$&$K$J$k$s$G$9$M$'!%(B

$B$5$9$,(B grepper $B>._7$5$s!#$^$!!"=c?h$K9%$_$N%b%s%@%$$J$s$G$9$,!"(B
$B;d$O%J%s%H%J%/(B for $B$NJ}$,9M$($d$9$$$N$G!"%h%/;H$C$F$7$^$&$G$9!#(B

# python $B!J:G6a$A$g$C$H5$$K$J$C$F$k!K$N(B for $B$N9=J8$b!"(Bperl $B$K(B
# $B;w$F$k$G$9$M!#(B

> $B!&%V%m%C%/$N=PF~$j$N%*!<%P!<%X%C%I$,$J$$(B
> $B!&Bh(B1$B0z?t$,>o$K(B0$B$rJV$9$N$G!$L5BL$J%j%9%H$rJV$5$J$$(B

$B$&!<$s!D$=$&$i$7$$$G$9$M$'!#(B

$B$"$5$@(B $B$?$/$d(B


