電子書籍の厳選無料作品が豊富!

下記はデレクトリー./image/$files/にある全ての画像フアィルを読み込んだ番号順にフアィル名を変更したいのですがよろしくお願いします。
opendir(DIR,"./image/$files/");
@dirs = readdir(DIR);
close(DIR);
foreach(@dirs) {
if ( $_ eq '.' || $_ eq '..' ) { next; }
$abc++;
print "$abc\n";
print "$_\n";
rename ("./image/$_","./image/$abc.jpg");

}
exit;

A 回答 (1件)

>./image/$files/にある全ての画像ファイル


ですから
rename ("./image/$files/$_","./image/$files/$abc.jpg");
の間違いではないですか
    • good
    • 0
この回答へのお礼

有難うございます、
rename ("./image/$files/$_","./image/$files/$abc.jpg");
で出来ました。

お礼日時:2006/07/27 13:37

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!