|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Konstantin Tokar 2:5020/400 10 Jul 2005 00:45:06
To : Fedor Katurov
Subject : Re: <none>
--------------------------------------------------------------------------------
Fedor Katurov wrote:
> Товарищи, а вот предложите вариант скрипта для работы с каталогами и
> подкаталогами. Мне нужна бесконечная рекурсия.
Для загрузки бесконечного компьютера? Пожалуйста.
use strict;
use File::Find;
my $folder = shift;
while(1){
find(sub { print $File::Find::name, "\n";}, $folder);
}
--- ifmail v.2.15dev5.3
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по:
| Тема: |
Автор: |
Дата: |
|
<без заголовка> |
Fedor Katurov |
09 Jul 2005 00:57:12 |
 <none> |
Ivan Frolkov |
09 Jul 2005 23:49:01 |
  Re: <none> |
Nikolay Pichtin |
10 Jul 2005 08:56:12 |
 Re: <none> |
Ivan Frolkov |
10 Jul 2005 17:37:24 |
|
Re: <none> |
Konstantin Tokar |
10 Jul 2005 00:45:06 |
|
Re: <none> |
Artem Chuprina |
10 Jul 2005 22:57:00 |
|
Hа: <none> |
Alexander V. Gaiduk |
12 Jul 2005 08:12:42 |
|
Re: Hа: <none> |
Artem Chuprina |
12 Jul 2005 08:44:35 |
|
Re: <none> |
Andrey Sapozhnikov |
19 Jul 2005 02:49:49 |
|
Re: <none> |
Dmitry Obukhov |
20 Jul 2005 22:28:20 |
|
Re: <none> |
Ivan Frolkov |
21 Jul 2005 00:31:52 |
|
|
