From 07258a7c80e22162e508295a3407f399b6c0e048 Mon Sep 17 00:00:00 2001
From: Arne Becker <101113822+EbiArnie@users.noreply.github.com>
Date: Wed, 13 Dec 2023 20:01:10 +0000
Subject: perl-safe-isa: New package (#41600)

---
 .../builtin/packages/perl-safe-isa/package.py      | 28 ++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 var/spack/repos/builtin/packages/perl-safe-isa/package.py

diff --git a/var/spack/repos/builtin/packages/perl-safe-isa/package.py b/var/spack/repos/builtin/packages/perl-safe-isa/package.py
new file mode 100644
index 0000000000..56b0e3ce77
--- /dev/null
+++ b/var/spack/repos/builtin/packages/perl-safe-isa/package.py
@@ -0,0 +1,28 @@
+# Copyright 2013-2023 Lawrence Livermore National Security, LLC and other
+# Spack Project Developers. See the top-level COPYRIGHT file for details.
+# Copyright 2023 EMBL-European Bioinformatics Institute
+#
+# SPDX-License-Identifier: (Apache-2.0 OR MIT)
+
+from spack.package import *
+
+
+class PerlSafeIsa(PerlPackage):
+    """Call isa, can, does and DOES safely on things that may not be objects"""
+
+    homepage = "https://metacpan.org/pod/Safe::Isa"
+    url = "https://cpan.metacpan.org/authors/id/E/ET/ETHER/Safe-Isa-1.000010.tar.gz"
+
+    maintainers("EbiArnie")
+
+    version("1.000010", sha256="87f4148aa0ff1d5e652723322eab7dafa3801c967d6f91ac9147a3c467b8a66a")
+
+    depends_on("perl@5.6.0:", type=("build", "link", "run", "test"))
+
+    def test_use(self):
+        """Test 'use module'"""
+        options = ["-we", 'use strict; use Safe::Isa; print("OK\n")']
+
+        perl = self.spec["perl"].command
+        out = perl(*options, output=str.split, error=str.split)
+        assert "OK" in out
-- 
cgit v1.2.3-60-g2f50