Forum Webscript.Ru
Программирование => Perl => Тема начата: Отец Никон от 10 Февраля 2003, 19:24:06
-
В документации к этому модулю значится, что для удаления какого-либо сообщения с сервера надо вызвать $pop->delete($message_number)
и затем
$pop->Close();
Однако у меня это не работает. Прошу помочь.
-
В чем помочь?
Не удаляется или не закрывается?
Кстати, мы о Mail::POP3Client говорим?
-
Да, о Mail::POP3Client, описался.
Не удаляется и не закрывается. Страница вообще не грузиться. И об ошибке не пишет.
-
Выложи сюда проблемный кусок кода.
-
http://www.sura.ru/kerry/pub/check_mail.pl_
-
sub delete_ {
$pop->delete($numb_mess);
print "Deleted\\n";
$pop->Close();
}
Ты будешь удивлен значением $numb_mess
perldoc perlsub
-
А что? У меня всё правильно. Как в командной строке передал, так и есть.
-
Уважаемый NeoNox!
Объясни, в чём дело. Номер сообщения я передаю правильный. Не знаю, что тебе не понравилось.
-
Ну раз Уважаемый, тогда отвечу.
Мне не понравилось то, что ты ленишся включить элементарную отладку в своей программе и вместо этого ждешь несколько дней для того что-бы кто нибудь вместо тебя написал решение.
Вот так должно выглядеть начало твоей программы:
#!/usr/bin/perl -w
use Mail::POP3Client;
use MIME::Base64;
use MIME::QuotedPrint;
use CGI::Carp qw(carpout fatalsToBrowser);
-> Can\'t locate object method "delete" via package "Mail::POP3Client"
Далее сам все поймешь. Кстати и в логах все ошибки написаны.
Второе, так как ты параметры передаешь это не дело.
А решение простое как яйцо - есть метод Delete а метода delete нет!
Удачи.
-
Ну спасибо, выручил. А отладку я всегда включаю, но тут почему-то даже не додумался этого сделать.
-
А как включать отладку, вроде дебагера у perl`а нет?
-
Что ты вкладываешь в понятие дебагера?
-
отладчик какой-нибудь.
А что значит "А <отладку> я всегда включаю"?
-
1. #!/usr/bin/perl -w
2. use CGI::Carp qw(carpout fatalsToBrowser);
3. use strict;