From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Message-ID: <45DB1C35.5010007@altlinux.ru> Date: Tue, 20 Feb 2007 19:05:09 +0300 From: Anton Gorlov User-Agent: Thunderbird 1.5.0.7 (Windows/20060909) MIME-Version: 1.0 To: =?KOI8-R?Q?=CB=D5=CC=D8=D4=D5=D2=CE=D9=CA_=CF=C6=D4=CF=D0=C9=CB?= Content-Type: text/plain; charset=KOI8-R; format=flowed Content-Transfer-Encoding: 8bit X-Spam-Score: -1.2 (-) X-Spam-Report: Spam detection software, running on the system "mail.espenza.ru", has identified this incoming email as possible spam. The original message has been attached to this so you can view it (if it isn't spam) or label similar future email. If you have any questions, see The administrator of that system for details. Content preview: Чем народ пользуется для анализа различных мест в работе перловых скриптов? В частности интерисует анализ мест типа use Net::SMTP; ... $smtp = Net::SMTP->new('mail.host.ru', Debug =>1); $smtp->auth('stalker@domain.ru', '*******'); $smtp->mail('stalker@domain.ru'); $smtp->recipient ('stalker@domain2.ru') [...] Content analysis details: (-1.2 points, 7.0 required) pts rule name description ---- ---------------------- -------------------------------------------------- -1.4 ALL_TRUSTED Passed through trusted hosts only via SMTP 0.2 AWL AWL: From: address is in the auto white-list X-Spam-Score2: -1.2 (-) Subject: [room] perl X-BeenThere: smoke-room@lists.altlinux.org X-Mailman-Version: 2.1.9rc1 Precedence: list Reply-To: =?koi8-r?b?y9XM2NTV0s7ZyiDPxtTP0MnL?= List-Id: =?koi8-r?b?y9XM2NTV0s7ZyiDPxtTP0MnL?= List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Tue, 20 Feb 2007 16:05:23 -0000 Archived-At: List-Archive: Чем народ пользуется для анализа различных мест в работе перловых скриптов? В частности интерисует анализ мест типа use Net::SMTP; ... $smtp = Net::SMTP->new('mail.host.ru', Debug =>1); $smtp->auth('stalker@domain.ru', '*******'); $smtp->mail('stalker@domain.ru'); $smtp->recipient ('stalker@domain2.ru') Вроде eval можно забзать... но чтение perldoc -f eval пока не просветлило. Может кто поделится примером?