2 files changed, 24 insertions, 1 deletions

diff --git a/CODEOWNERS b/CODEOWNERS
index 66ffe554962..7faf99dc0d8 100644
--- a/CODEOWNERS
+++ b/CODEOWNERS
@@ -312,6 +312,14 @@ guix/import/opam\.scm                              @guix/ocaml
 guix/scripts/import/opam\.scm                      @guix/ocaml
 tests/import/opam\.scm                             @guix/ocaml
 
+gnu/packages/perl(-.+|)\.scm$                      @guix/perl
+guix/build/perl-build-system\.scm                  @guix/perl
+guix/build/rakudo-build-system\.scm                @guix/perl
+guix/build-system/perl\.scm                        @guix/perl
+guix/build-system/rakudo\.scm                      @guix/perl
+guix/import/cpan\.scm                              @guix/perl
+guix/scripts/import/cpan\.scm                      @guix/perl
+
 gnu/packages/django\.scm                           @guix/python
 gnu/packages/jupyter\.scm                          @guix/python
 gnu/packages/python(-.+|)\.scm$                    @guix/python
diff --git a/etc/teams.scm b/etc/teams.scm
index 58c05282efe..ac0e81c3997 100755
--- a/etc/teams.scm
+++ b/etc/teams.scm
@@ -920,6 +920,21 @@ importer, and the ocaml-build-system."
               "guix/scripts/import/opam.scm"
               "tests/import/opam.scm")))
 
+(define-team perl
+  (team 'perl
+        #:name "Perl and Raku team"
+        #:description
+        "Perl & Raku packages, the \"cpan\" importer, and the
+perl-build-system as well as the rakudo-build-system."
+        #:scope
+        (list (make-regexp* "^gnu/packages/perl(-.+|)\\.scm$")
+              "guix/build/perl-build-system.scm"
+              "guix/build/rakudo-build-system.scm"
+              "guix/build-system/perl.scm"
+              "guix/build-system/rakudo.scm"
+              "guix/import/cpan.scm"
+              "guix/scripts/import/cpan.scm")))
+
 (define-team python
   (team 'python
         #:name "Python team"
@@ -1501,7 +1516,7 @@ the \"texlive\" importer."
 (define-member (person "Wilko Meyer"
                        "w@wmeyer.eu"
                        "theesm")
-  kernel)
+  kernel perl)
 
 (define-member (person "Untrusem"
                        "mysticmoksh@riseup.net"