2 files changed, 19 insertions, 0 deletions
diff --git a/lib/perl5db/t/proxy-constants b/lib/perl5db/t/proxy-constants
new file mode 100644
index 0000000000..ea60855b75
--- /dev/null
+++ b/lib/perl5db/t/proxy-constants
@@ -0,0 +1,9 @@
+#!/usr/bin/perl
+#
+# This code is used by lib/perl5db.t !!!
+#
+
+use constant FOO => "bar";
+sub s1 {
+    "main";
+}
diff --git a/lib/perl5db/t/rt-61222 b/lib/perl5db/t/rt-61222
new file mode 100644
index 0000000000..6dd6a94b7e
--- /dev/null
+++ b/lib/perl5db/t/rt-61222
@@ -0,0 +1,10 @@
+#!/usr/bin/perl
+#
+# This code is used by lib/perl5db.t !!!
+#
+
+package Pie;
+
+sub INCORRECT (DB);
+
+1;