Гость
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Perl копирование файлов / 3 сообщений из 3, страница 1 из 1
06.07.2004, 15:35
    #32591635
\/lad
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Perl копирование файлов
Подскажите плиз, кто знает!!!
Пытаюсь скопировать перловым скриптом файлики, скрипт работает нормально, а если делаю из этого скрипта CGI, скрипт вылитает на строке my $dr = new DirHandle.....
-----------------------------------------------------
foreach my $tempDir (@dirArray)
{
mkdir $outputDirectory . $SEPARATOR . $tempDir;

my $dr = new DirHandle "$siteDirectory$siteName$SEPARATOR$tempDir";
if (defined $dr)
{
while (defined(my $filename = $dr->read))
{
copy("$siteDirectory$siteName$SEPARATOR$tempDir$SEPARATOR$file name", "$outputDirectory$SEPARATOR$tempDir");
}
}

}
-----------------------------------------------------
В чем может быть проблема?
...
Рейтинг: 0 / 0
06.07.2004, 16:24
    #32591805
g613
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Perl копирование файлов
а из какого это модуля ( DirHandle, copy ) ?

а вообще проверь права на директории/файлы, то есть имеет ли ВЕБ сервер доступ к
"$siteDirectory$siteName$SEPARATOR$tempDir"
...
Рейтинг: 0 / 0
06.07.2004, 16:32
    #32591838
\/lad
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Perl копирование файлов
из одноименного модуля
use DirHandle;
уже нашел ошибку, забыл модуль прописать, спасибо за вопрос :)
...
Рейтинг: 0 / 0
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Perl копирование файлов / 3 сообщений из 3, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]