X-Git-Url: https://git.octo.it/?a=blobdiff_plain;f=bindings%2Fperl%2Flib%2FCollectd%2FMockDaemon.pm;h=300d2c4a85a3739a7b637a9063d6afb73abfcc46;hb=b1f183c582302d26133dae9c6748f7e08dbd8b56;hp=381b2d17ce941432cb49b6c5519dd5fe0da39750;hpb=fc6f1e3d33d646391adb5cedc62e7b3904c15003;p=collectd.git diff --git a/bindings/perl/lib/Collectd/MockDaemon.pm b/bindings/perl/lib/Collectd/MockDaemon.pm index 381b2d17..300d2c4a 100644 --- a/bindings/perl/lib/Collectd/MockDaemon.pm +++ b/bindings/perl/lib/Collectd/MockDaemon.pm @@ -55,9 +55,20 @@ sub daemon { } sub listval { - my $now = time; + my @timevals = ( + 1479835353.75, + 1479835354.434, + 1479835356, + 1479835354, + 1479835354, + 1479835350.820, + 1479835351, + 1479835354.2, + 1479835353, + ); + my $i = 0; return print_nvalues(scalar @metrics) . - join('', map { "$now $_\n" } @metrics); + join('', map { $timevals[$i++ % @timevals] . " $_\n" } @metrics); } sub getval {