ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Nikolay Pichtin                      2:5056/30      23 Jun 2001  09:09:57
 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}
  YK> readdir(D))[0];), только зачем оно там нужно :)?
 
 Оно нужно для того, что если файлы будет заливать
 неквалифицированный юзер. Значит все может быть.
 Вот это и хочу предусмотреть.
 
 -- Hиколай.
 * Hичто не красит так женщин, как перекись водорода. (От Фоменко)
 ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
 ---
  * Origin: Если это глупо, но работает, - значит это не глупо. (2:5056/30)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор