Каталоги


* Получение списка файлов

# Вариант 1

opendir(MYDIR, "/tmp") || die "$!";
@files = <MYDIR>;
@files = grep /.txt$/i, readdir MYDIR;
while($file = readdir <MYDIR>) { ... }
closedir(MYDIR);

# Вариант 2

@files = glob('/tmp/*.tmp');
@files = <*.txt>;

# Создание, удаление каталогов

@fileinfo = stat $filename;

unlink($file);

rename $old, $new;

mkdir($newdir, 0755);

rmdir($newdir);