[libconfig-model-dpkg-perl] 05/05: Dpkg::Copyright: added scary example to modify copyright content with cme

[dod at debian.org]

This is an automated email from the git hooks/post-receive script.

dod pushed a commit to branch master
in repository libconfig-model-dpkg-perl.

commit 90f27236e9252107bec6d4732d7bea2d48ab63d0
Author: Dominique Dumont <dod at debian.org>
Date:   Sun Jun 14 11:05:54 2015 +0200

    Dpkg::Copyright: added scary example to modify copyright content with cme
---
 lib/Config/Model/Dpkg/Copyright.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lib/Config/Model/Dpkg/Copyright.pm b/lib/Config/Model/Dpkg/Copyright.pm
index 862e59d..f05c778 100644
--- a/lib/Config/Model/Dpkg/Copyright.pm
+++ b/lib/Config/Model/Dpkg/Copyright.pm
@@ -298,6 +298,10 @@ Here's another more complex example:
  # use a loop there vvvvvv to clean up that vvvvvvvvvvvvvvvvvvvvvvv in all copyrights
  ! copyright   Files:~/.*/     Copyright=~s/all\s*rights\s*reserved//i
 
+ # defeat spammer by replacing all '@' in emails of 3rdparty files
+ # the operation :~/^3party/ loops over all Files entries that match ^3rdparty
+ # and modify the copyright entry with a Perl substitution
+ ! Files:~/^3rdparty/ Copyright=~s/@/(at)/
 
 =head1 Under the hood
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libconfig-model-dpkg-perl.git