|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Pavel Ammosov 2:5020/52 16 Jun 2001 20:29:31 To : Rostislav Podgornyi Subject : Re: net::pop3 -------------------------------------------------------------------------------- Интересно, чтобы случилось с fido.ru.perl, если бы пиплы стали читать документацию? :-) Rostislav Podgornyi wrote: [...] RP>for ($i=1;$i<=$pass;$i++) { # перебираем все номера мессаг RP> @tops = $pop->top($i); # получаем header $i-той мессаги (массив, RP> # состоящий из строк) man Net::POP3 top ( MSGNUM [, NUMLINES ] ) Get the header and the first NUMLINES of the body for the message MSGNUM. *Returns a reference to an array* which contains the lines of text read from the server. то есть, сейчас у тебя в @tops один элемент-скаляр, хрянящий ссылку на массив. $tops = $pop->top($i); foreach $top (@$tops) { print "$top"; } RP>MDaeomon в логах пишет: RP>Fri 2001-06-15 13:09:58: [84:92] Accepting POP connection from [127.0.0.8] странный адрес весьма, btw -- [We] use bad software and bad machines for the wrong things. -- R.W. Hamming --- FIDOGATE 4.4.0-snp10 * Origin: Zenon N.S.P. news server (2:5020/52.0) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/298702cebeb0e.html, оценка из 5, голосов 10
|