diff --git a/src/warden-client/bin/sender-random.pl b/src/warden-client/bin/sender-random.pl
index fa15f8a5a93d914f2cb537598de6ab180f802325..cca1fcd9503b41e61946e7308feb57deb1289cd7 100755
--- a/src/warden-client/bin/sender-random.pl
+++ b/src/warden-client/bin/sender-random.pl
@@ -1,15 +1,17 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
 #
-# Copyright (C) 2011-2013 Cesnet z.s.p.o
+# Copyright (C) 2011-2015 Cesnet z.s.p.o
 #
 # Use of this source is governed by a BSD-style license, see LICENSE file.  
 
-use Switch;
 use strict;
+use warnings;
+
+use Switch;
 use DateTime;
 
 my $warden_path = '/opt/warden-client';
-require $warden_path . '/lib/WardenClientSend.pm';
+require $warden_path . '/lib/WardenClient.pm';
 
 my $service = "test";
 # service is needed in authorization process of the client,
@@ -84,7 +86,7 @@ my @event = (
   $timeout, # $timeout
   );
 
-WardenClientSend::saveNewEvent($warden_path, \@event);
+WardenClient::saveNewEvent(\@event);
 
 #foreach (@event) {
 #  print "$_\n";