Newsgroups: fj.net.infosystems.www.authoring,fj.lang.perl
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!majic-news.majic.co.jp!news.kddnet.ad.jp!news.dvlp.kddnet.ad.jp!news.cs.ritsumei.ac.jp!odins-suita!itserv.it.okayama-u.ac.jp!elecnews!libero!yama
From: yama@biotech.okayama-u.ac.jp (Mamoru Yamanishi)
Subject: Re: CGI can't get data from FORM correctly
Sender: news@plasma.elec.okayama-u.ac.jp
Message-ID: <yama-3006970922240001@libero.biotech.okayama-u.ac.jp>
Date: Mon, 30 Jun 1997 00:22:24 GMT
Content-Type: text/plain; charset=iso-2022-jp
References: <33B3C627.7FE7@educ.cs.gunma-u.ac.jp> <33B52FB2.D60@educ.cs.gunma-u.ac.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: 27
Xref: galaxy.trc.rwcp.or.jp fj.net.infosystems.www.authoring:259 fj.lang.perl:2134
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.perl&nb=2134&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.

> while (<@input>){

> $B$r(B
> 
> foreach $tmp (@input){
>    ($key,$content) = split('=',$tmp);
> }
> 
> $B$H$9$k$H$A$c$s$H(B split $B$7$F$/$l$k$h$&$K$J$j$^$7$?!#(B

$B$=$l$O$h$+$C$?$G$9$M!#(B

$B$G$b!";d$N5?Ld$O2r7h$7$F$*$j$^$;$s!#$I$J$?$+2r@b$7$F$$$?$@$1$J$$$G$7$g$&$+(B
$B!#(B

$B$H$3$m$G!"(Bforeach$B$NB?=E%k!<%W$dCf$K(Bwhile(<>)$B$J$s$+$r$$$l$J$$$J$i!"(B

   foreach(@input) {
      ($key, $content) = split(/=/);
      .....

$B$H$7$F!"(B$_$B$G<u$1$k$N$,4JC1$@$H;W$$$^$9!#(B

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