use strict;
+BEGIN { pop @INC if $INC[-1] eq '.' };
+
sub usage () {
print <<END;
usage: ratelimit.pl [options] <period> <regex> <logfile>
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