X-Git-Url: https://git.exim.org/exim.git/blobdiff_plain/e83a8cf22196471e5fec61a03b03c1992097a3a2..b8a84c728b30b9d4736e9a37a2e3d3ca62684d23:/src/util/ratelimit.pl

diff --git a/src/util/ratelimit.pl b/src/util/ratelimit.pl
index 1f08a9929..ce54fe6c3 100644
--- a/src/util/ratelimit.pl
+++ b/src/util/ratelimit.pl
@@ -1,7 +1,11 @@
 #!/usr/bin/perl -wT
+# Copyright (c) The Exim Maintainers 2022
+# SPDX-License-Identifier: GPL-2.0-or-later
 
 use strict;
 
+BEGIN { pop @INC if $INC[-1] eq '.' };
+
 sub usage () {
   print <<END;
 usage: ratelimit.pl [options] <period> <regex> <logfile>
@@ -24,7 +28,7 @@ options:
             whereas internally Exim computes sender rates to the
             accuracy of your computer's clock (typically 10ms).
 
-<regex>     The second argumetnis a regular expression.
+<regex>     The second argument is a regular expression.
 
             Each line is matched against the regular expression.
             Lines that do not match are ignored. The regex may