Fujimi_3_Haizara-Cho(Rinzo_Shimizu)

2005-02-07

CGIの下準備

とてもローカルなファイルの(^^)検索CGIをまた作ろうと思って、下ごしらえのスクリプト。
カレントディレクトリ(いまいるディレクトリ)の下にある「zen」というディレクトリにある全部のファイル名を書き出したファイルを逆順にしたファイル(dir.dat)を生成する。
素人なので、下ごしらえをいっきにできない。ログファイルというのは数字順になっているので、こういうファイルを作りやすい。
こういう目次ができれば、そのファイルを順々に開けて処理をして、別に書き出す、ということができる。

-------------------------------------------
$dir = './zen';
opendir DIR, "$dir";
open OUT, ">dir.dat";
@alldir = grep( !/^\.+/, readdir DIR);
close DIR;
foreach (reverse(@alldir)) {
print OUT $_,"\n";}
-------------------------------------------


posted at 23:04:23 on 2005-02-07 by belle - Category: General

Comments

No comments yet

Add Comments

:

:
: