Вопрос № 37185: Добрых суток.
Пишу CGI-скрипт на Perl, который должен обрабатывать заполненную пользователем форму и по результатам создавать запись в Active Directory о новом пользователе. Для этого нужно вызвать файлик dsadd.exe с параметрами. Как реализовать ...
Вопрос № 37.185
Добрых суток.
Пишу CGI-скрипт на Perl, который должен обрабатывать заполненную пользователем форму и по результатам создавать запись в Active Directory о новом пользователе. Для этого нужно вызвать файлик dsadd.exe с параметрами. Как реализовать на Perl вызов этого файла с параметрами (параметров много: имя, фамилия, пароль и т.д.)?
Если можно, чуть подробнее.
И ещё, лингвистическую проверку данных на наличие ошибок лучше делать на стороне сервера на Perl или на JavaScript?
Заранее спасибо
Отвечает: Лучников Юрий Владимирович
Здравствуйте, PaveL SvetlY!
Вызов системных программ обеспечивает операция обратных кавычек. 1.
Допустим мы работаем под управлением Win32 и хотим в своем скрипте получить справку по команде VOL.
В консоли мы бы просто набрали: >HELP VOL.
Чтобы получить тот же самый результат в Perl скрипте, мы пишем такую строчку кода: $results = `HELP VOL`;
Тем самым выполнится команда HELP, а в переменной $results будет содержаться результат исполнения команды.
В вашем случае мы будем писать: $results = `dsadd.exe -p1 -p2 -p3`;.
2.
Оптимальный вариант: проверять как на стороне клиента (что пресечет ввод случайных ошибок и лишнюю перезагрузку страницы), так и на стороне сервера (дабы пресеч подмену параметров в ручном запросе к скрипту).
Успехов;)
Ответ отправил: Лучников Юрий Владимирович (статус: Студент)
Ответ отправлен: 10.03.2006, 15:01 Оценка за ответ: 5 Комментарий оценки: Спасибо, то что надо! %) А по поводу 2, что значит пресечь подмену параметров? Если передаю параметры методом POST, как можно очистить STDIN, чтобы потом при обновлении страницы скрипт не отрабатывал ещё раз?