|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Roman Kirjanov 2:5020/400 19 Apr 2003 11:03:53 To : Rinat H. Sadretdinow Subject : Re: Текущий путь. -------------------------------------------------------------------------------- Hello, Rinat! You wrote to Roman Kirjanov on Fri, 18 Apr 2003 19:49:23 +0000 (UTC): RK>> Hужно узнать текущий путь для скрипта. RHS> use Cwd; RHS> print cwd; RHS> Так не подойдёт? Замечательно подошло, спасибо. А это глюк виндовс или и в остальных системах -f, stat() работают только для текущего каталога ? opendir(my $dir, 'html'); foreach (readdir($dir)) {print $_, ': ', -f $_, "\n";} closedir($dir); Если делать для текущего - напротив файлов ставит "1", а для "html" нет. With best regards, Meister. [ http://www.sinn.ru/~meister/ ] --- ifmail v.2.15dev4 * Origin: Demos online service (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/65778480e085.html, оценка из 5, голосов 10
|