#45 Deprecated regex characters in Perl 5.22

[Mark Nottingham]

Logwatch 7.4.1 raises some deprecation warnings with Perl 5.22

E.g.:

--------------------- Amavisd-new Begin ------------------------

Unescaped left brace in regex is deprecated, passed through in regex; marked by <-- HERE in m/^(CLEAN|SPAM(?:MY)?|INFECTED (.?)|BANNED (.?)|BAD-HEADER(?:-\d)?|UNCHECKED|MTA-BLOCKED|OVERSIZED|OTHER|TEMPFAIL)(?: { <-- HERE [^}]+})?, ([^[]+ )?(?:([^<]+) )?<([>)] -> ([(<].?[)>]), (?:.Hits: ([-+.\d]+))(?:. size: (\d+))?(?:. autolearn=(\w+))?/ at /usr/share/logwatch/scripts/services/amavis line 2286.

--------------------- httpd Begin ------------------------

Unescaped left brace in regex is deprecated, passed through in regex; marked by <-- HERE in m/\G%{ <-- HERE Referer}i/ at /usr/share/logwatch/scripts/services/http line 313.
Unescaped left brace in regex is deprecated, passed through in regex; marked by <-- HERE in m/\G%{ <-- HERE User-Agent}i/ at /usr/share/logwatch/scripts/services/http line 316.

[Pascal Volk]

There are futher warnings with Perl 5.22. For details see warnings.txt.

[Stefan Jakobs]

Thanks for reporting. Fixed in r296 and r305.