|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Anton Gorlov 2:5059/37 20 Feb 2007 23:15:22 To : Anton Yuzhaninov Subject : провека на результат... -------------------------------------------------------------------------------- 20 февраля 2007 года (а было тогда 20:57:57) Anton Yuzhaninov в своем письме к Anton Gorlov писал: AY> я уже писал это: У меня инт здох... 200 самсунговская.. так что Ой. AY> if (!$smtp->ok) { AY> warn $smtp->message(); AY> $smtp->quit; AY> exit 1; AY> } У меня несколько более другйо вариант нарисовася.. и вроде работает ==== заливка "Windows Clipboard" ==== if ($smtp->auth('gorlov@domain.ru', 'coolsuperpwd')) { print "true\n"; } else { print "error\n"; } ==== конец "Windows Clipboard" ==== То биш одна часть задачи решена... осталось теперь придумать как при debug=>1 вывод smtp=>... перенаправить в переменную... Причём вывод не всего скрипта..а основных моментов С уважением. Anton aka Stalker np: silence ( Winamp ушел в Партизаны ;-) Linux Registered User #386476 [#*TEAM:*#] [#_Злой СисОп_#] [*Heavy Metal!*] [*_Усачи_*] --- GoldED+/W32 1.1.5-041013 * Origin: ... истина где-то там... /dev/null ... (2:5059/37) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/1142145db49d9.html, оценка из 5, голосов 10
|