トップページ >  Perl >  複数のファイルを一度に作成する
初版2003/10/27: 最終更新日2003/10/30
複数のファイルを一度に作成する
目次
概要
ソースの入手
ファイル構成
スクリプト設定変更
データファイルの書き方
スクリプト実行
概要
複数のファイルを一度に作成するスクリプトです。
データファイル(makedt.dat)に、作成したいファイル名を行ごとに書きます。そしてスクリプト(makedt.cgi)を実行すると、作成したいファイルがディレクトリ(data)配下にできます。

ソースの入手
以下の書庫ファイルをダウンロードして、解凍してください。
解凍すると、makedt.cgi、makedt.datが展開されます。

makedt.zip

makedt.lzh

ファイル構成
┣makedt.cgi
┗makedt.dat

スクリプト設定変更
必要であれば、makedt.cgiの以下の箇所を変更します。
		  
my $datafile='./makedt.dat';←データファイルのパスを指定してください。

my $dir='data';←作成したいファイルを格納するための、ディレクトリ名を指定してください。
              ディレクトリはスクリプトが自動生成するので、作成しないで下さい。


データファイルの書き方
下の例のように、ひとつの行にひとつのファイル名を書いていきます。
ただし、ファイル名に、\/;:*?<>|は使用できません。また、ファイル名は最大30文字までです。

a.dat b.dat c.dat d.dat



スクリプト実行
makedt.cgiとmakedt.datをD:\perl配下に保存したとします。コマンドプロンプトを起動し、D:\perlに移動して以下のように実行します。

D:\perl > perl makedt.cgi

「データ作成完了」と表示されたらOKです。