Just came across the following problem with perl 5.10.0.
Anyone running SA under 5.10.0? Are we affected too?


===========
From: Mark Martinec <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED]
Date: Fri Sep 26 12:06:39 2008
   
Martin,
[...]

That was a tough one. It turns out there is a bug
(or an undocumented(?) change) in perl5.10.0:

$ perl5.8.8 -le '$r=qr/(.)$/; @a= "abC\ndeF\n" =~ /$r/mg; print join(",",@a)'
C,F

$ perl5.10.0 -le '$r=qr/(.)$/; @a= "abC\ndeF\n" =~ /$r/mg; print join(",",@a)'
F


A workaround it to use the /m flag also in the qr of a virus entry,
as the /m in the final evaluating expression seems to be ignored:

$ perl5.10.0 -le '$r=qr/(.)$/m; @a= "abC\ndeF\n" =~ /$r/mg; print 
join(",",@a)'
C,F

[...]

  Mark

Reply via email to