|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Roman Kirjanov 2:5020/400 18 Apr 2003 23:31:36
To : All
Subject : Текущий путь.
--------------------------------------------------------------------------------
Hello, All!
Hужно узнать текущий путь для скрипта. В окружении Апача есть абсолютный
путь - оттуда доставть ? А если не под Апачем ? По perldoc пошарился -
не нашел.
Траблы из-за этого куска кода:
chdir($path);
opendir(my $dir, '.');
foreach (readdir($dir)) {
if (time() - (stat())[9] > 60 && -f)
{unlink();}
}
closedir($dir);
Под виндовсом stat работает только для текущего каталога, а писать потом
chdir('..'); - имхо, некузяво.
Можно один раз выяснить и вбивать абсолютные пути, но тоже некузяво:
дома они у меня одни, на серваке другие :((
ПС.
perldoc -U sprintf
что-то должен давать ? Говорит, нету для "sprintf"
With best regards, Meister.
[ http://www.sinn.ru/~meister/ ]
--- ifmail v.2.15dev4
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
