Find local .pl first.
authorheiko
Tue, 24 May 2016 16:32:36 +0200
changeset 54 cd04db2a79cc
parent 53 86d6f7fdeb7e
child 55 ab282b335eb5
Find local .pl first.
exigrey.pl
--- a/exigrey.pl	Tue May 24 16:32:18 2016 +0200
+++ b/exigrey.pl	Tue May 24 16:32:36 2016 +0200
@@ -31,8 +31,8 @@
 use FindBin qw/$Bin/;
 use POSIX qw/strftime mktime/;
 
-do "@LIBDIR@/exigrey.pl"
-  or do "./exim-exigrey.pl"
+do './exim-exigrey.pl'
+  or do '@LIBDIR@/exigrey.pl'
   or die $!;
 
 my $VERSION = '$Id$';