From 9b352560beac14b0ea854fe527229738db27b048 Mon Sep 17 00:00:00 2001
From: Tomas Plesnik <plesnik@ics.muni.cz>
Date: Tue, 24 Jan 2012 17:37:52 +0100
Subject: [PATCH] predelano generovani casu
---
src/warden-client/bin/sender.pl | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/src/warden-client/bin/sender.pl b/src/warden-client/bin/sender.pl
index e2fdaf7..0cd320a 100755
--- a/src/warden-client/bin/sender.pl
+++ b/src/warden-client/bin/sender.pl
@@ -34,6 +34,7 @@
use Switch;
use strict;
+use DateTime;
my $warden_path = '/opt/warden-client';
require $warden_path . '/lib/WardenClientSend.pm';
@@ -45,7 +46,8 @@ switch (int(rand(2) + 0.5)) {
case 2 { $service = 'HoneyScan'; }
}
-my $detected = "2011-0" . int(rand(9) + 0.5) . "-" . (int(rand(20) + 0.5) + 10) . "T" . (int(rand(14) + 0.5) + 10) . ":" . (int(rand(50) + 0.5) + 10) . ":" . (int(rand(50) + 0.5) + 10);
+my $local_detected = time()
+my $detected = DateTime->from_epoch(epoch => $local_detected);
my $type = "";
switch (int(rand(9) + 0.5)) {
--
GitLab