From f1f7e783a754d9fa2421faffae61ec21d22a6642 Mon Sep 17 00:00:00 2001 From: Tomas Plesnik <plesnik@ics.muni.cz> Date: Tue, 27 Jan 2015 14:24:48 +0100 Subject: [PATCH] pridano nacitani adresare lib a modulu WardenClient.pm pomoci promenne __FILE__ --- src/warden-client/bin/sender-random.pl | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/warden-client/bin/sender-random.pl b/src/warden-client/bin/sender-random.pl index c315fe0..b892e9a 100755 --- a/src/warden-client/bin/sender-random.pl +++ b/src/warden-client/bin/sender-random.pl @@ -9,9 +9,11 @@ use warnings; use Switch; use DateTime; +use File::Basename; -my $warden_path = '/opt/warden-client'; -require $warden_path . '/lib/WardenClient.pm'; +my $bin = File::Basename::dirname(__FILE__); +use lib "$bin/../lib"; +use WardenClient; my $service = "test"; # service is needed in authorization process of the client, -- GitLab