|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Nikolay Pichtin 2:5056/30 23 Jun 2001 09:50:53
To : Yuriy Kaminskiy
Subject : Re: Регистр файла
--------------------------------------------------------------------------------
NP>> Предполагается, что в каталоге могут быть файлы,
NP>> как в нижнем регистре, так и в ВЕРХHЕМ, а также
NP>> возможно, что и вообще смесь регистров.
NP>> Как их открыть по open(FILE,"file") не смотря на регистр?
YK> В "странной" операционке (винда/пополама) ничего делать не нужно, оно
YK> и так. В нормальной - perldoc File::Glob (на предмет GLOB_NOCASE) или
YK> делать это же руками (opendir(D,...); $realfile = (grep {/^\Q$file\E$/i}
Еще в догонку.
Как определить, что имя каталога, или файла
состоит только из цифр. Пробовал =~ s/\D?// не ловит имена
вида 23t или t34 и т.п., что недопустимо.
-- Hиколай.
* Крутому софту - крутой БАГ!
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
---
* Origin: Если это глупо, но работает, - значит это не глупо. (2:5056/30)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
