|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Pavel V. Ammosov 2:5020/52 07 May 2001 02:55:29 To : All Subject : Re: Запустить скрипт из скрипта -------------------------------------------------------------------------------- >А как можно запустить на выполнение скрипт внутри другого скрипта? > >Т.е. надо из скрипта при определённых условиях послать письмо на >определённый адрес. Имеется внешний/другой скрипт отапрвки почты. Я хочу >внутри первого скрипта сформировать адрес $email, текст сообщения $body и >вызвать на выполнение внешний скрипт примерно так: >http://www.server.ru/cgi-bin/email.pl?recipient=$email?text=$body Ты можешь заюзать LWP, если очень хочется, но я советую тебе задуматся о последствиях: что будет если я пойду на твой server и запущу ..cgi-bin/email.pl?recipient=somebody@example.com&text=make+$$$+fast ? Правильный вариант будет cделать общий модуль MySite.pm: package MySite; use strict; sub email { my %params = @_; my $recipient = $params{'recipient'} or die "не указан recipient"; my $text = $params{'text'} or die "Hет текста"; ... код отправки здесь } 1; и в своем скрипте просто писать: use MySite; .... MySite::email('recipient'=>$address, 'text'=>$text); >Какой командой это можно сделать? Будут ли $email и $body восприниматься как >переменные или письмо уйдёт на адрес "$email"? > >Thanks in advance! Да, и не стоит постить одно и тоже сообщение в обе группы (fido.ru.perl, fido.ru.cgi.perl), по крайней мере, пока фидорасы кросспостинг не сделают нормальный. -- Pavel Ammosov O \ apavel@aha.ru __ ) http://isabase.philol.msu.ru/~apavel/ ) wget -O - isabase.philol.msu.ru/~apavel/key.asc|pgp -fka O / --- slrn/0.9.6.3 (Linux) * Origin: Zenon N.S.P. news server (2:5020/52.0) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/82768801fac7d.html, оценка из 5, голосов 10
|