Re: filtrar spam
On Thursday 25 September 2003 14:16, Ernest Adrogué wrote:
> On Thu, Sep 25, 2003 at 01:37:16AM +0200, Orestes Mas wrote:
> > El problema és que jo no sé gens de perl i no he pogut modificar
> > l'escript (només he pogut introduir noves cadenes a cercar), i els
> > últims 10 missatges els he hagut d'esborrar a mà
>
> Tampoc en sé gens de perl, però amb una mica d'imaginació he
> vist que comentant unes línies...
>
> if ($nonstop) {
> push @deleted, $msgnum;
> } else {
> my $a;
> do {
> # print 'Mark message for deletion? ([Y]es,
> [n]o, [a]bort): '; # $a = <STDIN>
> # } until $a =~ /^[yna]?$/i;
> # if ($a =~ /^y?$/i) {
> push @deleted, $msgnum;
> # } elsif ($a =~ /^a$/i) {
> # say "Aborted. No messages were deleted from
> the server."; # $pop->quit;
> # exit;
Acabo de publicar la 1.3, resol un bug que feia que es donessin alguns
falsos negatius, i en general funciona molt mes fina. Els canvis
respecte de la 1.2 son:
Version 1.3:
* Automated testing and database of headers for regressions.
* Some refactoring.
* Patterns revised taking a third study into account (thanks to
Maurice Lanselle) and some false negatives.
* Fixed a bug related to qr//i that caused some false negatives
(thanks to Ron Newman).
* Non-existing relevant headers are taken as an indication of
infection.
* We do not longer assume From:, To:, and Subject: exist (that gave
some warnings about the use of uninitialized values).
* Code clean up.
* Fixed a bug that disabled ANSI escape sequences on Mac OS X
(thanks to Spoon from Freenode#perl).
Esta disponible a la seva pagina:
http://www.hashref.com/prj/swendeleter
Hi he penjat una manera de ser notificat per mail de noves versions. A
veure si podem tancar aquest fil en aquesta llista.
-- fxn
Reply to: