From d1e1766c08b48660a021f7e26dc3ca4eebc05563 Mon Sep 17 00:00:00 2001
From: Gerald Carter <jerry@samba.org>
Date: Mon, 7 Nov 2005 13:43:06 +0000
Subject: r11548: adding simple script to tail syslog and write to eventlog tdb
 (This used to be commit 9337a286c9169e1e0247b5923942eeeb4467d95a)

---
 examples/scripts/eventlog/parselog.pl | 8 ++++++++
 1 file changed, 8 insertions(+)
 create mode 100644 examples/scripts/eventlog/parselog.pl

(limited to 'examples/scripts/eventlog')

diff --git a/examples/scripts/eventlog/parselog.pl b/examples/scripts/eventlog/parselog.pl
new file mode 100644
index 0000000000..0a2b5b90dc
--- /dev/null
+++ b/examples/scripts/eventlog/parselog.pl
@@ -0,0 +1,8 @@
+while(<>) {
+    chomp();
+    @le = split '\s+',$_,5;
+    $ln = $le[4];
+    $cname = $le[3]; 
+    $outstr = sprintf "TMG: %d\nTMW: %d\nEID: 1000\nETP: INFO\nECT: 0\nRS2: 0\nCRN: 0\nUSL: 0\nSRC: Syslog\nSRN: $cname\nSTR: $ln\nDAT:\n\n",time(),time();
+    print $outstr;
+}
-- 
cgit