also,
have you tried to mail [EMAIL PROTECTED], or is this header fake ?
-kg
On Mon, 17 Feb 2003, Joydeep Bakshi wrote:
> On Monday 17 February 2003 6:35am, you wrote:
> > > Hi all,
> > > every day I receive about 1MB of spam from [EMAIL PROTECTED]
> > > how to block this mail from downloading as well as delete from the pop
> >
> > server?
> >
> > > I have tried with Mozilla, but it can't delete that mail from the server
> > > though blocks it from downloading.
> > >
> > > is there any particular spam filter in debian which can solve this ?
> > >
> > > pls give a solution.
> >
> > hmmm
> > just because i love perl
> > just because perl gives me time to waste :) We have ...
> > Cron her and let her go !
> >
> > Mail Blocker .01 beta
> >
> > #!/usr/bin/perl
> > use Net::POP3;
> > use strict;
> >
> > my $POP3server = 'vsnl.net'; # Guessing :)
> > my $username = '[EMAIL PROTECTED]'; # Your user name
> > my $password = 'k3W1p44S'; # Your password
> > my $hate_phrase = '[EMAIL PROTECTED]'; # You can play with this :)
> > ### Dont bother with the rest, well unless you want to :)
> >
> > my $pop3 = Net::POP3->new($POP3server); # Constructor
> > my $no_of_mails = $pop3->login($username, $password); # Login to the server
> > exit if ($no_of_mails == 0); # Exit if there are no mails
> > for (1..$no_of_mails ) {
> > # Get to doing the job if there are mails
> > my $data = $pop3->get($_); # Get mail body
> > $pop3->delete($_) if ($data =~ /$hate_phrase/msi) # Delete mail if body
> > matches hate phrase
> > }
> >
> > $pop3->quit() # Dont forget to quit or POP3 will do nothing !!
> > # Should be in the class destructor instead of me having to call it... phew
> > the extra keystrokes !!
>
> thanks 4 the codes. but how to use this? should I make a shell script &
> write down its name in the "run command " field of kmail ? pls. clarify.
>
>
> thanks in advanced
>
>
> --
> To unsubscribe, send mail to [EMAIL PROTECTED] with the body
> "unsubscribe ilug-cal" and an empty subject line.
> FAQ: http://www.ilug-cal.org/node.php?id=3
>
--
To unsubscribe, send mail to [EMAIL PROTECTED] with the body
"unsubscribe ilug-cal" and an empty subject line.
FAQ: http://www.ilug-cal.org/node.php?id=3
