File: timestamp.convert

package info (click to toggle)
maradns 1.2.12.04-1etch2
  • links: PTS
  • area: main
  • in suites: etch
  • size: 6,676 kB
  • ctags: 2,176
  • sloc: ansic: 26,137; sh: 3,657; perl: 703; makefile: 622; python: 593; sql: 106; awk: 11
file content (13 lines) | stat: -rw-r--r-- 265 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
#!/usr/bin/perl

# Convert MaraDNS' time stamps in to a human-readable format

$| = 1;

while(<>) {
        if(/Timestamp: (\d+)/) {
                $lt = localtime($1);
                s/Timestamp: (\d+)/Timestamp: $lt/;
                }
        print;
        }