source:
ocsinventory-agent/trunk/fuentes/lib/Ocsinventory/Agent/Backend/AccessLog.pm
@
468
Last change on this file since 468 was 468, checked in by , 5 years ago | |
---|---|
File size: 397 bytes |
Line | |
---|---|
1 | package Ocsinventory::Agent::Backend::AccessLog; |
2 | |
3 | sub run { |
4 | my $params = shift; |
5 | my $common = $params->{common}; |
6 | |
7 | my ($YEAR, $MONTH , $DAY, $HOUR, $MIN, $SEC) = (localtime |
8 | (time))[5,4,3,2,1,0]; |
9 | my $date=sprintf "%02d-%02d-%02d %02d:%02d:%02d", |
10 | ($YEAR+1900), ($MONTH+1), $DAY, $HOUR, $MIN, $SEC; |
11 | |
12 | $common->setAccessLog ({ |
13 | USERID => 'N/A', |
14 | LOGDATE => $date |
15 | }); |
16 | |
17 | } |
18 | |
19 | 1; |
Note: See TracBrowser
for help on using the repository browser.