From 12fba1344183ee7fdbf0b8c5dcfb06939a0d5906 Mon Sep 17 00:00:00 2001
From: Arne Becker <101113822+EbiArnie@users.noreply.github.com>
Date: Tue, 5 Mar 2024 19:46:57 +0000
Subject: [PATCH] perl-chi-driver-memcached: new package (#43011)

Adds CHI::Driver::Memcached.

Modified perl-chi to make the tests work. Testing modules in perl-chi
were not loaded when testing CHI::Driver::Memcached, so added the "run"
type to these.
---
 .../perl-chi-driver-memcached/package.py      | 31 +++++++++++++++++++
 .../builtin/packages/perl-chi/package.py      | 14 ++++-----
 2 files changed, 38 insertions(+), 7 deletions(-)
 create mode 100644 var/spack/repos/builtin/packages/perl-chi-driver-memcached/package.py

diff --git a/var/spack/repos/builtin/packages/perl-chi-driver-memcached/package.py b/var/spack/repos/builtin/packages/perl-chi-driver-memcached/package.py
new file mode 100644
index 0000000000..374621f23b
--- /dev/null
+++ b/var/spack/repos/builtin/packages/perl-chi-driver-memcached/package.py
@@ -0,0 +1,31 @@
+# Copyright 2013-2024 Lawrence Livermore National Security, LLC and other
+# Spack Project Developers. See the top-level COPYRIGHT file for details.
+#
+# SPDX-License-Identifier: (Apache-2.0 OR MIT)
+
+from spack.package import *
+
+
+class PerlChiDriverMemcached(PerlPackage):
+    """Use Memcached for cache storage"""
+
+    homepage = "https://metacpan.org/pod/CHI::Driver::Memcached"
+    url = "https://cpan.metacpan.org/authors/id/J/JS/JSWARTZ/CHI-Driver-Memcached-0.16.tar.gz"
+
+    maintainers("EbiArnie")
+
+    license("Artistic-1.0-Perl OR GPL-1.0-or-later")
+
+    version("0.16", sha256="cff9857fbf3f83247b8fc3ab41bdbf141ea0afe23b45109ee0b415f6baadb3c6")
+
+    depends_on("perl-chi@0.33:", type=("build", "run", "test"))
+    depends_on("perl-moose@0.66:", type=("build", "run", "test"))
+    depends_on("perl-test-class", type=("build", "test"))
+
+    def test_use(self):
+        """Test 'use module'"""
+        options = ["-we", 'use strict; use CHI::Driver::Memcached; print("OK\n")']
+
+        perl = self.spec["perl"].command
+        out = perl(*options, output=str.split, error=str.split)
+        assert "OK" in out
diff --git a/var/spack/repos/builtin/packages/perl-chi/package.py b/var/spack/repos/builtin/packages/perl-chi/package.py
index e696508069..d483a4106b 100644
--- a/var/spack/repos/builtin/packages/perl-chi/package.py
+++ b/var/spack/repos/builtin/packages/perl-chi/package.py
@@ -18,7 +18,7 @@ class PerlChi(PerlPackage):
 
     version("0.61", sha256="583545c9e5312bb4193ab16de9f55ff8f4b4a7ded128cee8dd2cb021d4678b5b")
 
-    depends_on("perl-cache-cache", type=("build", "test"))
+    depends_on("perl-cache-cache", type=("build", "run", "test"))
     depends_on("perl-carp-assert@0.20:", type=("build", "run", "test"))
     depends_on("perl-class-load", type=("build", "run", "test"))
     depends_on("perl-data-uuid", type=("build", "run", "test"))
@@ -27,19 +27,19 @@ class PerlChi(PerlPackage):
     depends_on("perl-json-maybexs@1.003003:", type=("build", "run", "test"))
     depends_on("perl-list-moreutils@0.13:", type=("build", "run", "test"))
     depends_on("perl-log-any@0.08:", type=("build", "run", "test"))
-    depends_on("perl-module-mask", type=("build", "test"))
+    depends_on("perl-module-mask", type=("build", "run", "test"))
     depends_on("perl-moo@1.003:", type=("build", "run", "test"))
     depends_on("perl-moox-types-mooselike@0.23:", type=("build", "run", "test"))
     depends_on("perl-moox-types-mooselike-numeric", type=("build", "run", "test"))
     depends_on("perl-string-rewriteprefix", type=("build", "run", "test"))
     depends_on("perl-task-weaken", type=("build", "run", "test"))
-    depends_on("perl-test-class", type=("build", "test"))
-    depends_on("perl-test-deep", type=("build", "test"))
-    depends_on("perl-test-exception", type=("build", "test"))
-    depends_on("perl-test-warn", type=("build", "test"))
+    depends_on("perl-test-class", type=("build", "run", "test"))
+    depends_on("perl-test-deep", type=("build", "run", "test"))
+    depends_on("perl-test-exception", type=("build", "run", "test"))
+    depends_on("perl-test-warn", type=("build", "run", "test"))
     depends_on("perl-time-duration@1.06:", type=("build", "run", "test"))
     depends_on("perl-time-duration-parse@0.03:", type=("build", "run", "test"))
-    depends_on("perl-timedate", type=("build", "test"))
+    depends_on("perl-timedate", type=("build", "run", "test"))
     depends_on("perl-try-tiny@0.05:", type=("build", "run", "test"))
 
     def test_use(self):