Newsgroups: fj.lang.perl
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!newsgate1.web.ad.jp!newsbase.nisiq.net!news.win.or.jp!ayamura-win!tamaru-news!kuee-news!odins-suita!itserv.it.okayama-u.ac.jp!elecnews!libero!yama
From: yama@biotech.okayama-u.ac.jp (Mamoru Yamanishi)
Subject: Re: split csv file
Sender: news@plasma.elec.okayama-u.ac.jp
Message-ID: <yama-0208970943230001@libero.biotech.okayama-u.ac.jp>
Date: Sat, 2 Aug 1997 00:43:23 GMT
Content-Type: text/plain; charset=iso-2022-jp
References: <5rq5jn$8pq@meshsv18.tk.meshnet.or.jp>
Nntp-Posting-Host: libero.biotech.okayama-u.ac.jp
Mime-Version: 1.0
Organization: Okayama Univ., Biotech. Dept.
X-Newsreader: NewsWatcher-J 2.0J16
Lines: 29
Xref: galaxy.trc.rwcp.or.jp fj.lang.perl:2214
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.perl&nb=2214&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%;%k$NCf$K(B "," $B$,;H$o$l$F$$$k$H(B
>
>        aaaaa,"bbb,bbb",cccc
>
>$B$N$h$&$K6h@Z$i$l$^$9!#(B
>
>$B$3$N%U%!%$%k$r(B perl $B$G%;%k$KJ,2r$7$?$$$N$G$9$,!"(B
>
>        split(',');
>
>$B$G$O!"(B"," $B$r4^$`%;%k$r@5$7$/G'<1$G$-$^$;$s!#(B

"hoge"$B$O#1B3$-$G$I$s$JJ8;z$,Mh$F$b$+$^$o$J$$$h$&$J%Q%?!<%s$r(B
$BMQ0U$7$F!"$=$&$8$c$J$$%Q%?!<%s$H;H$$J,$1$k$N$O$I$&$G$7$g$&$+!#(B

$B$=$7$F!"%;%k$N6h@Z$j$O%?%V$J$I$N6h@Z$j5-9f$KCV$-49$($F$*$j$^$9!#(B

$B<B:]$K;H$o$l$k$H$-$K$O!"%;%kCf$NJ8;z$KCm0U$7$F!"%Q%?!<%s$N(B
$BCf$rJT=8$7$F2<$5$$!#!J2<$NNc$G$OJ8;z$H?t;z$0$i$$$7$+%^%C%A$7$J$$!K(B

while(<HOGE>) {
   s/((\"[\w\d\, \-\.\+]+\")|([\w\d\-\.\+]+))\,/$1\t/g;
   @answer = split("\t");
}

-- 
Mamoru Yamanishi <yama@biotech.okayama-u.ac.jp>
+81-86-251-8196, +81-86-253-7399(GII type FAX)
Okayama Univ., Biotech. Dept.
