summaryrefslogtreecommitdiff
path: root/src/util/cramtest.pl
diff options
context:
space:
mode:
authorPhil Pennock <pdp@exim.org>2017-02-10 19:37:44 -0500
committerPhil Pennock <pdp@exim.org>2017-02-10 19:37:44 -0500
commit4d3d955f2791199b35704c3e9784dc99fd229696 (patch)
treee2fde978479ed22a0b428d0b2e13dbd642d2434e /src/util/cramtest.pl
parentcf0c61644d7dd2dfb29f6418d95bf4d8cae199ea (diff)
perl paranoia about @INC
Diffstat (limited to 'src/util/cramtest.pl')
-rwxr-xr-xsrc/util/cramtest.pl2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/util/cramtest.pl b/src/util/cramtest.pl
index cb70eb404..48f989a0c 100755
--- a/src/util/cramtest.pl
+++ b/src/util/cramtest.pl
@@ -24,6 +24,8 @@
# Vadim Vygonets <vadik-exim@vygo.net>. All rights reserved.
# Public domain is OK with me.
+BEGIN { pop @INC if $INC[-1] eq '.' };
+
use MIME::Base64;
use Digest::MD5;