|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrey Tuman 2:5020/400 05 Jul 2000 11:03:56 To : All Subject : выполнение системных команд --------------------------------------------------------------------------------
Привет всем!
Заметил такую вещь.
Когда выполняешь
perl -e "{print `/usr/src/tac+ia-0.96pre9/lib/libpasswd/pwd_mkdbtac
/etc/tac_plus/master.passwd` ; }"
- нет никаких ошибок.
Hо, когда эту строку я вызываю из модуля, типа
dsa# perl -e "{use cisco ; delete_from_tacplus ( "iptic6930" ) ; }"
pwd_mkdbtac: line too long (max - 2048)
pwd_mkdbtac: /etc/tac_plus/master.passwd: Inappropriate file type or format
Error on execute commnad '/usr/local/tacplus/bin/pwd_mkdbtac
/etc/tac_plus/master.passwd'
Operation not completed.
dsa#
Если же команду выполнять прямо из шелл - опять никаких ошибок.
Посмотрел исходник pwd_mkdbtac.c - ошибка выдается в случае, если не найдено
'\n' в первых 2048 байтах считанного /etc/tac_plus/master.passwd. Проверка
файла показала, что таких строк в файле нет.
В чем может быть проблема?
FreeBSD 3.4 + perl 5.005_03
Andrey Tuman
--- ifmail v.2.15dev5
* Origin: Business Network Angarsk (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/9094d79bb5f2.html, оценка из 5, голосов 10
|