chdir into script directory to use relative paths

diff --git a/gearman_driver.pl b/gearman_driver.pl
index 492ea6a..494e10a 100755 (executable)
--- a/gearman_driver.pl
+++ b/gearman_driver.pl
@@ -4,6 +4,9 @@ use warnings;
 use Gearman::Driver;
 use lib 'lib';
 
+my $dir = $0;
+$dir =~ s{/[^/]+$}{};
+chdir $dir || die "can't chdir into $dir";
 
 $SIG{__WARN__} = sub { print STDERR @_ if $ENV{DEBUG} };