|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrey Sapozhnikov 2:5020/400 24 Dec 2001 22:25:16 To : ’ҐаҐе®ў ѓҐ ¤Ё© Subject : Re: Имена каталогов с точка ми и-d --------------------------------------------------------------------------------
Терехов Геннадий wrote:
> Кто мне объяснит почему при проверке файлов на предмет являются ли
> они директориями или нет директории имена которых начинаются с точки
> (Linux) таковыми не считаются?
> Вот пример хелловорда (чисто для демонстрации непонятки :) ):
>
> #!/usr/bin/perl -w
> opendir(DIR,"/home/webmaster") or die "Hе могу открыть каталог: $!\n";
> @names = readdir(DIR) or die "Hе могу прочитать каталог: $!\n";
> foreach $name (@names) {
> if (-d $name) {
> print "Hайден каталог: $name\n";
> }
> else {
> print "Hайден файл: $name\n";
> }
> }
> closedir(DIR);
Потому что файлы кроме . и .. вообще не находятся,
а не определяются как файлы. readdir возвращает
КОРОТКИЕ имена (что вы и сами видите в print),
а добавить "/home/webmaster/" к имени (при проверке
по -d) Вы забыли.
Андрей
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/52841bf304f5.html, оценка из 5, голосов 10
|