https://bz.apache.org/SpamAssassin/show_bug.cgi?id=7480
Bug ID: 7480
Summary: Unescaped left brace in regex
Product: Spamassassin
Version: 3.4.1
Hardware: PC
OS: Linux
Status: NEW
Severity: normal
Priority: P2
Component: Libraries
Assignee: [email protected]
Reporter: [email protected]
Target Milestone: Undefined
In perl 5.26 I'm getting the following warning when I run sa-learn:
Unescaped left brace in regex is deprecated here (and will be fatal in Perl
5.30), passed through in regex; marked by <-- HERE in m/^(.{ <-- HERE
,200}).*$/ at /usr/share/perl5/Mail/SpamAssassin/PerMsgStatus.pm line 921.
This is the line that's producing the warning:
$str =~ s/^(.{,200}).*$/$1/gs;
That is invalid syntax; there needs to be number before the comma inside curly
braces. I believe this should work:
$str =~ s/^(.{1,200}).*$/$1/gs;
--
You are receiving this mail because:
You are the assignee for the bug.
