Newsgroups: fj.lang.perl
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!infoweb-news!news.nagoya.infoweb.or.jp!news-gw!news-k-net!nf2.iij.ad.jp!news.iij.ad.jp!iijnet!news.nid.co.jp!news
From: Masafumi TAKAHASHI <takahasi@soft.nid.co.jp>
Subject: Re: [Q]Pattern matching doesn't work. Why?
In-Reply-To: tom@morito.mgmt.waseda.ac.jp's message of 08 Nov 1996 08:55:09 GMT
X-Nntp-Posting-Host: olive
Content-Type: text/plain; charset=ISO-2022-JP
Message-ID: <E0Juuo.B7L@Maria.nid.co.jp>
Sender: news@Maria.nid.co.jp
Organization: Nippon Information Development Co.,Ltd. Tokyo, Japan
X-Newsreader: Gnus v5.0.15
References: <TOM.96Nov8175509@crystal.morito.mgmt.waseda.ac.jp>
Mime-Version: 1.0 (generated by tm-edit 7.85)
Date: Fri, 8 Nov 1996 11:37:16 GMT
X-Pgp-Fingerprint: D8 AB 4C DD F4 CD 04 1F  E5 88 21 7D E3 23 FB 6D
Lines: 19
Xref: galaxy.trc.rwcp.or.jp fj.lang.perl:1432
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.perl&nb=1432&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.

In article <TOM.96Nov8175509@crystal.morito.mgmt.waseda.ac.jp>
  tom@morito.mgmt.waseda.ac.jp (TANAKA Tomonari) writes:

> Sonoda> $B!!(Bwhile($line = <IN>){
> Sonoda> $B$H$+!"=q$1$P$$$$$N$G$7$g$&$+!#(B
> 
> while (<IN>){
> ...
> 
> $B$@$1$G!"(B$_ $B$K9T$NFbMF$,F~$k$N$G$O$J$$$G$7$g$&$+!#(B

$B$=$l$O$b$A$m$s$=$&$J$N$G$9$,!#7o$N%9%/%j%W%H$N>JN,2DG=$JItJ,$r(B
$B$I$s$I$s%7%'%$%W%"%C%W$7$F9T$/$H!":G8e$K$O(B $B1vLn!w%=%K!<(B $B$5$s$,(B
$B<($7$?$h$&$J(B one liner $B$K9T$-$D$$$F$7$^$&$+$H!D(B

-- 
$B9b662m;K(B ($B3t(B)$B%(%L%"%$%G%$(B
<takahasi@soft.nid.co.jp>

