use integer time

git-svn-id: svn://svn.oetiker.ch/rrdtool/branches/1.2/program@919 a5681a0c-68f1-0310-ab6d-d61299d08faa

diff --git a/examples/perftest.pl.in b/examples/perftest.pl.in
index f7907c2..7a04220 100755 (executable)
--- a/examples/perftest.pl.in
+++ b/examples/perftest.pl.in
@@ -28,7 +28,7 @@ use RRDs;
 
 sub create($){
   my $file = shift;
-  my $start = time;
+  my $start = int(time);
   RRDs::create  ( $file.".rrd", qw(
                        -s300
                        DS:in:GAUGE:400:U:U