Hi!
I am trying to connect to a pop3 account to get a count of the unread
mail using Net::POP3::SSLWrapper in perl v5.16.2, but it fails with
the error Net::POP3: Unexpected EOF on command channel at pop3s.pl
line 4.
This is the tiny script from the examples:
use Net::POP3::SSLWrapper;
pop3s
Hi
I am planning to use the Net::POP3 module to downald a mail box and then
pass the mails via a parser . I would like to know if the there is a option
to downlod only a certin number ( 100 ) of mails [unread] and then mark
the mails as read . The mail box sie is 400 mb . And is there a way
Gerard Robin wrote:
> Hello,
Hello,
> I use Net::POP3 for donwload the header of my messages.
> .
> $pop = Net::POP3->new($server);
> ...
> $top = $pop->top($msgnum);
> ...
> my ($from) = grep /^From:/i, @lines;
> my ($to) = grep /^To:/i, @lines;
&g
Hello,
I use Net::POP3 for donwload the header of my messages.
.
$pop = Net::POP3->new($server);
...
$top = $pop->top($msgnum);
...
my ($from) = grep /^From:/i, @lines;
my ($to) = grep /^To:/i, @lines;
my ($subject) = grep /^Subject:/i, @lines;
...
When To is:
To: beg
How do I use Net::POP3 (or is there an alternative to Net::POP3) to talk
to an SSL POP3 server (like gmail's)?
Regards,
dave
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
Hi,
I got how to retrieve message, the problem is now
If i send an Attachment i don't know how to retrieve it, and if in the text
area I put a webpage i don't know how to retrieve it,
Any guidance is more than welcome
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mai
Hi,
I want to retrieve email from my website using a program.
like hotmail it is just the administrator side of my program (if someone is
out of town and no access to his/her computer).
I can retrieve subject and to fine using Regex but I can't seem to get the
Text message.
maybe i should use anot
o posted
a Net::POP3 question a couple of days ago.
Shawn
big
Janek Schleicher wrote:
>
> Shawn Milochik wrote:
> >
> > @message = undef;
You missed this one Janek. :-)
To the OP, you are assigning the value undef to the first array
element. That statement is the same as:
$message[0] = undef;
If you populate the array with push() you now have an extra
Shawn Milochik wrote:
> I was just playing with Net::POP3 this past weeked. Here's a working
> script. It's not great, but I got the basics working, and you can mess
> with it.
>
It's a nice script, the only things that could be improved is to write
it more Perl
I was just playing with Net::POP3 this past weeked. Here's a working
script. It's not great, but I got the basics working, and you can mess
with it.
Shawn
#|/-\||/-\||/-\||/-\||/-\||/-\||/-\||/-\||/-\|
# Code
#|/-\||/-\||/-\||/-\||/-\||/-\||/-\||/-\||/-\|
#!/usr/bin/perl
#us
Jenda Krynicky wrote:
>
> And I do not believe you have mail.ax.ax.com in the settings. I'd bet
> it's mail.ax.com.
$ host ax.ax.com
Host not found.
$ host ax.com
ax.com has address 63.140.192.41
ax.com mail is handled (pri=10) by mail.ax.com
That appears to be the case. :-)
John
--
use Per
> if($DEBUG)
> {
>$| = 1;
>open(STEER, ">&STOUT");
> }
Erm ... did not you mean
open(STDERR, ">&STDOUT");
?
> # Set this variable to your POP3 server name
> my $Server Name = "mail.ax.ax.com";
Variable name with a space in the middle? Wow!
And I do not believe you have mail.a
Hi!
I am having problem with this code:
#!/usr1/local/bin/perl
#===
# How to read email with Net::POP3
# Copyright 2000, Emmy P. Lewis
# Created 02/27/00
#===
# This script is designed to show
# how to use Net::POP3 to read your
# email
Does anyone have any experience using the ping method
from Net::POP3? I've included the following code,
after running I get "Cannot get ping stats:"
#/usr/bin/perl -w
use Net::POP3;
$pop = Net::POP3->new($mail_server) or die "Can't
connect $!\n";
defined (
[[a private correspondant]] writes:
[ references to my suggested code format change elided...]
> Just want to thank you for saying it.
You're welcome. I share what took me years to learn.
> Have grabbed large scripts out there to maybe use some or
> all, and sometimes first have to reformat
[EMAIL PROTECTED] (Cabezon aurélien) writes:
> Here is the code :
[...]
And here is a piece of the code indented to aid
understanding.
#work with each mail##
foreach $item (keys %$list) {
# get mail
$message = $handle->get($item);
# print mail (waiting fo
| You need to call $handle->quit ();
|
| /Jon
Great, it works now !
I'm so stupid :p
thx a lot.
---
Cabezon Aurélien
http://www.iSecureLabs.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
You need to call $handle->quit ();
/Jon
Cabezon Aurélien wrote:
>
> Hi list,
>
> I'm playing around Net::POP3.
> I wanna make a script that is able to check for pop3 mail and then save them
> in a MySQL database (not implemented yet, usefull for mailing archiving)
Hi list,
I'm playing around Net::POP3.
I wanna make a script that is able to check for pop3 mail and then save them
in a MySQL database (not implemented yet, usefull for mailing archiving)
I'm at the start of the script but i have a problem.
First i check for new mail : OK
Then i get
20 matches
Mail list logo
