diff --git a/src/warden-client/bin/sender-cli.pl b/src/warden-client/bin/sender-cli.pl index 75fce01dd9b0c5a99a47571bed8d8bab4ffc4385..e2efc07ee6dcafb512b2686814a316016f0bf3c8 100755 --- a/src/warden-client/bin/sender-cli.pl +++ b/src/warden-client/bin/sender-cli.pl @@ -1,10 +1,12 @@ -#!/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 strict; +use warnings; + use DateTime; use Getopt::Long; @@ -87,9 +89,9 @@ my @event = ($opt_s, $opt_t, $opt_e, $opt_o, $opt_v, my $warden_path = $opt_w; # Inclusion of warden-client sender module -require $warden_path . '/lib/WardenClientSend.pm'; +require $warden_path . '/lib/WardenClient.pm'; # Sending event to Warden server -WardenClientSend::saveNewEvent($warden_path, \@event); +WardenClient::saveNewEvent(\@event); exit 0;