Newsgroups: fj.lang.perl
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!newsbase.nisiq.net!houou.ufnet.com!tamaru-news!kuee-news!kuis-news!sakura.kudpc!sakunami!yagi!news
From: "YOSHIFUJI, Hideaki" <yoshfuji@ecei.tohoku.ac.jp>
Subject: Re: [Q]How to output directory
X-Nntp-Posting-Host: eiw02.ec.ecei.tohoku.ac.jp
Content-Type: text/plain; charset=iso-2022-jp
Message-ID: <33847553.2BC636B2@ecei.tohoku.ac.jp>
X-Priority: 3 (Normal)
Sender: news@ecei.tohoku.ac.jp
Reply-To: yoshfuji@ecei.tohoku.ac.jp
Content-Transfer-Encoding: 7bit
Organization: School of Engineering, Tohoku University, JAPAN
References: <5ls1fi$98g$5@omega00.fc.obayashi.co.jp> <5luqva$dcd$1@omega00.fc.obayashi.co.jp>
Mime-Version: 1.0
Date: Thu, 22 May 1997 16:33:23 GMT
X-Mailer: Mozilla 4.0b4 [en] (Win95; I)
Lines: 39
Xref: galaxy.trc.rwcp.or.jp fj.lang.perl:1986
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.perl&nb=1986&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.

$B5HF#1QL@!wElKLBg3XEE>p7O$G$9!#(B

Akira Tsukagoshi wrote:
> system("dir \\****\\***** ")
> system('dir \\****\\***** ')
> 
> $B$N$I$A$i$G$b%j%9%H$N<hF@$,$G$-$^$7$?!#(B

$B$(!)(B


> system() $B$,;H$($?$+$iNI$$$N$G$9$,!"!%!%!%!%!%(B
> opendir() $B$b;n$7$^$7$?$,!"$3$A$i$NJ}$,>e<j$/<hF@=PMh$J$$$N$G$h$&$J5$$,(B
> $B$7$^$9!#(B
> $B!)!)!)!)(B

$B$($(!)!!$&$^$/$$$-$^$9$1$I!#(B

opendir (DIR,'C:/');
while ($dir = readdir(DIR)){ print "$dir\n" }#$B%9%+%i%3%s%F%-%9%H(B
closedir (DIR);

$B$"$k$$$O(B

opendir (DIR,'C:/');
@dir = readdir(DIR);#$B%j%9%H%3%s%F%-%9%H(B
closedir (DIR);
foreach (@dir){ print "$_\n" }

$B$G$7$g$&!#(B


$B!t$^$5$+$H$O;W$$$^$9$,!"I=<($9$k$3$H$r!V<hF@!W$H8@$C$F$$$?$N$G$9$+!)(B

-- 
$B5HF#1QL@(B (YOSHIFUJI, Hideaki)
School of Engineering, Tohoku University, JAPAN

<URL:http://www.ecei.tohoku.ac.jp/~yoshfuji/>
