[prev in list] [next in list] [prev in thread] [next in thread] 

List:       spamassassin-users
Subject:    Re: Matching multiple newlines [Was: Bayes refinement]
From:       Karsten =?ISO-8859-1?Q?Br=E4ckelmann?= <guenther () rudersport ! de>
Date:       2014-05-21 20:31:16
Message-ID: 1400704276.4882.39.camel () monkey
[Download RAW message or body]

On Wed, 2014-05-21 at 11:59 -0700, Ian Zimmerman wrote:
> Would this be of any import?
> 
>  [24+0]~$ perl --version
> 
> This is perl 5, version 14, subversion 2 (v5.14.2)

Nope, the Perl version does not make a difference here.


-- 
char *t="\10pse\0r\0dtu\0.@ghno\x4e\xc8\x79\xf4\xab\x51\x8a\x10\xf4\xf4\xc4";
main(){ char h,m=h=*t++,*x=t+2*h,c,i,l=*x,s=0; for (i=0;i<l;i++){ i%8? c<<=1:
(c=*++x); c&128 && (s+=h); if (!(h>>=1)||!t[s+h]){ putchar(t[s]);h=m;s=0; }}}

[prev in list] [next in list] [prev in thread] [next in thread]