1 files changed, 7 insertions, 0 deletions
diff --git a/dist/SelfLoader/t/03taint.t b/dist/SelfLoader/t/03taint.t
new file mode 100644
index 0000000000..528d9b8805
--- /dev/null
+++ b/dist/SelfLoader/t/03taint.t
@@ -0,0 +1,7 @@
+#!perl -T
+
+# This runs 01SelfLoader.t under taint.
+
+my $file = __FILE__ =~ s/[\w.]+\z/01SelfLoader.t/r;
+unshift @INC, ".";
+do $file or die "Cannot run $file: ", $@||$!;