Adding service "now" to Resmon Core::Resmon

lib/Resmon/Status.pm

@@ -182,6 +182,14 @@ sub dump_generic_module {
         my $info = $services->{$service};
         $rv .= $dumper->($module,$service,$info);
     }
+    if ($module eq "Core::Resmon") {
+      my $info = {
+        name => 'now',
+	type => 'i',
+	value => time(),
+      };
+      $rv .= $dumper->($module,"now",$info);
+    }
     return $rv;
 }
 sub dump_xml {