diff options
author | Steven Schubiger <stsc@refcnt.org> | 2013-11-18 19:57:09 +0100 |
---|---|---|
committer | Steven Schubiger <stsc@refcnt.org> | 2013-11-18 19:57:09 +0100 |
commit | eb97e893a835f728f4bff344d937d0b1813f711e (patch) | |
tree | 076923b808b5291542180fce052efc0e24b2a4ca /server.cgi | |
parent | 3f79b3088e5eaa6185822f26c21a3b5e8548e60e (diff) | |
download | distdns-eb97e893a835f728f4bff344d937d0b1813f711e.tar.gz distdns-eb97e893a835f728f4bff344d937d0b1813f711e.tar.bz2 |
Record and list last updated time
Diffstat (limited to 'server.cgi')
-rwxr-xr-x | server.cgi | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -134,6 +134,7 @@ if (exists $access{$params{name}} && grep /^$params{pc}$/i, @{$access{$params{na } } push @$data, { map { $_ => $params{$_} } qw(netz pc name ip) }; + $data->[-1]->{time} = time; seek($fh, 0, 0) or die "Cannot seek to start of $json_file: $!\n"; truncate($fh, 0) or die "Cannot truncate $json_file: $!\n"; |