Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Perl: Системное программирование > Как проверить существует ли файл?


Автор: study 23.9.2004, 13:35
Народ, мне надо проверить существует ли файл, и если нет, то создать его и записать туда строку, если существует, то строку записывать не надо. sample.gif

Автор: chaos 23.9.2004, 14:00
Вот так всегда это делается
Код

if (-e $filename) {
 #если файл существует то....
}

Автор: study 23.9.2004, 14:15
Спасибо chaos сейчас попробую.

Добавлено @ 14:20
chaos, а что значит -e в if()

Автор: chaos 23.9.2004, 14:42
Этот -e ключик проверяет существование файла
Есть еще
-r $filename Истина если разрешено чтение
-w $filename Истина если разрешена запись
-z $filename Истина если файл существует но он пустой
-s $filename возвращает размер файла если тот сущ
-f $filename Истина если файл обычный
-T $filename Истина если файл текстовый
-B $filename Истина если файл бинарный
-M $filename Возвращает кол-во дней с момента последней модификации



Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)