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;
> my ($subject) = grep /^Subject:/i, @
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
bcc:
02:14 PM Subject: Re:
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 Perlish :-)
> #!/usr/bin/perl
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