From 3abee9a49abceef8c13b6c424e1e7a11b84e6c52 Mon Sep 17 00:00:00 2001
From: "Flavio S. Glock" <flavio.glock@booking.com>
Date: Mon, 23 Mar 2026 13:05:24 +0100
Subject: [PATCH] Add deprecate.pm pragma stub

The deprecate pragma warns when modules are loaded from Perl core
directories. Since PerlOnJava doesn't have the traditional core/site
library distinction, this is a no-op stub.

Fixes Module::Pluggable installation which depends on Devel::InnerPackage
which uses 'use deprecate'.

Generated with [Devin](https://cli.devin.ai/docs)

Co-Authored-By: Devin <158243242+devin-ai-integration[bot]@users.noreply.github.com>
---
 src/main/perl/lib/deprecate.pm | 37 ++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)
 create mode 100644 src/main/perl/lib/deprecate.pm

diff --git a/src/main/perl/lib/deprecate.pm b/src/main/perl/lib/deprecate.pm
new file mode 100644
index 000000000..d10145fc1
--- /dev/null
+++ b/src/main/perl/lib/deprecate.pm
@@ -0,0 +1,37 @@
+package deprecate;
+use strict;
+use warnings;
+
+our $VERSION = '0.04';
+
+# PerlOnJava stub for deprecate pragma
+#
+# This pragma warns when a module is loaded from Perl core directories,
+# encouraging installation from CPAN. Since PerlOnJava doesn't have the
+# traditional core/site library distinction, this is a no-op stub.
+
+sub import {
+    # No-op: PerlOnJava doesn't distinguish core vs site libraries
+}
+
+1;
+
+__END__
+
+=head1 NAME
+
+deprecate - Perl pragma for deprecating the inclusion of a module in core
+
+=head1 SYNOPSIS
+
+    use deprecate;  # warn about future absence if loaded from core
+
+=head1 DESCRIPTION
+
+This is a PerlOnJava stub. The original pragma warns users when loading
+modules from Perl core that will be removed in future releases.
+
+Since PerlOnJava doesn't have the traditional core/site library directory
+distinction, this pragma is a no-op.
+
+=cut