From 56bb329b077755d791193f2a40328e8b2f4c1a81 Mon Sep 17 00:00:00 2001
From: Arne Becker <101113822+EbiArnie@users.noreply.github.com>
Date: Wed, 10 Jan 2024 23:46:09 +0000
Subject: [PATCH] perl-class-accessor: New package (#41698)

* perl-class-accessor: New package

Adds Class::Accessor

* Removed copyright line

* New year
---
 .../packages/perl-class-accessor/package.py   | 25 +++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 var/spack/repos/builtin/packages/perl-class-accessor/package.py

diff --git a/var/spack/repos/builtin/packages/perl-class-accessor/package.py b/var/spack/repos/builtin/packages/perl-class-accessor/package.py
new file mode 100644
index 00000000000..3b97b137c75
--- /dev/null
+++ b/var/spack/repos/builtin/packages/perl-class-accessor/package.py
@@ -0,0 +1,25 @@
+# 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 PerlClassAccessor(PerlPackage):
+    """Automated accessor generation"""
+
+    homepage = "https://metacpan.org/pod/Class::Accessor"
+    url = "https://cpan.metacpan.org/authors/id/K/KA/KASEI/Class-Accessor-0.51.tar.gz"
+
+    maintainers("EbiArnie")
+
+    version("0.51", sha256="bf12a3e5de5a2c6e8a447b364f4f5a050bf74624c56e315022ae7992ff2f411c")
+
+    def test_use(self):
+        """Test 'use module'"""
+        options = ["-we", 'use strict; use Class::Accessor; print("OK\n")']
+
+        perl = self.spec["perl"].command
+        out = perl(*options, output=str.split, error=str.split)
+        assert "OK" in out