#441 change localtime to gmtime

bin/netdisco-do

@@ -137,7 +137,7 @@ foreach my $host (@hostlist) {
 if ($queue_only) {
   jq_insert( \@job_specs );
   info sprintf '%s: queued %s jobs at %s',
-    $action, (scalar @job_specs), scalar localtime;
+    $action, (scalar @job_specs), scalar gmtime;
 }
 else {
   foreach my $spec (@job_specs) {
@@ -152,7 +152,7 @@ else {
     # do job
     try {
       info sprintf '%s: %s started at %s',
-        $action, $actiontext, scalar localtime;
+        $action, $actiontext, scalar gmtime;
       $worker->run($job);
     }
     catch {
@@ -168,7 +168,7 @@ else {
       );
     }
 
-    info sprintf '%s: finished at %s', $action, scalar localtime;
+    info sprintf '%s: finished at %s', $action, scalar gmtime;
     info sprintf '%s: status %s: %s', $action, $job->status, $job->log;
     $exitstatus = 1 if !$exitstatus and $job->status ne 'done';
   }

lib/App/Netdisco/Backend/Role/Poller.pm

@@ -27,7 +27,7 @@ sub worker_body {
       next unless defined $job;
 
       try {
-          $job->started(scalar localtime);
+          $job->started(scalar gmtime);
           prctl sprintf 'nd2: #%s poll: #%s: %s',
             $wid, $job->id, $job->display_name;
           info sprintf "pol (%s): starting %s job(%s) at %s",
@@ -48,7 +48,7 @@ sub worker_body {
 
 sub close_job {
   my ($self, $job) = @_;
-  my $now  = scalar localtime;
+  my $now  = scalar gmtime;
 
   info sprintf "pol (%s): wrapping up %s job(%s) - status %s at %s",
     $self->wid, $job->action, $job->id, $job->status, $now;

lib/App/Netdisco/Util/Graph.pm

@@ -62,7 +62,7 @@ Creates netmap of network.
 sub graph {
     my %CONFIG = %{ setting('graph') };
 
-    my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();
+    my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime();
     my $month = sprintf("%d%02d",$year+1900,$mon+1);
 
     info "graph() - Creating Graphs";

lib/App/Netdisco/Util/Statistics.pm

@@ -3,7 +3,7 @@ package App::Netdisco::Util::Statistics;
 use Dancer qw/:syntax :script/;
 use Dancer::Plugin::DBIC 'schema';
 
-use Time::Piece; # for OO localtime
+use Time::Piece; # for OO gmtime
 
 use base 'Exporter';
 our @EXPORT = ();
@@ -40,7 +40,7 @@ sub update_stats {
 
   $schema->txn_do(sub {
     $schema->resultset('Statistics')->update_or_create({
-      day => localtime->ymd,
+      day => gmtime->ymd,
 
       device_count =>
         $schema->resultset('Device')->count_rs->as_query,