Path: usenet.cise.ufl.edu!newsfeeds.nerdc.ufl.edu!news.ecn.ou.edu!newsfeed.berkeley.edu!newshub.northeast.verio.net!newsfeed.corridex.com!nntp2.savvis.net!inetarena.com!not-for-mail
From: "Bill Jones" <bill@fccj.org>
Newsgroups: comp.lang.perl.announce,comp.lang.perl.misc
Subject: [ANNOUNCE] New Unix System Log(s) scanner
Followup-To: comp.lang.perl.misc
Date: 24 Sep 1999 12:37:25 GMT
Organization: Internet Arena
Lines: 27
Approved: merlyn@stonehenge.com (comp.lang.perl.announce)
Message-ID: <7sfra5$s1r$1@play.inetarena.com>
NNTP-Posting-Host: halfdome.holdit.com
X-Disclaimer: The "Approved" header verifies header information for article transmission and does not imply approval of content.
Xref: usenet.cise.ufl.edu comp.lang.perl.announce:364 comp.lang.perl.misc:104121

[ANNOUNCE] msg_log.perl -

On CPAN, I have posted an updated version of a simple Unix 'syslog /
messages / sulog' scanner.  A very simple-minded script, really, but one
which may help people just starting out using Perl for SysAdmin work get
other ideas they may have off the design board and into practice.

Please see http://www.cpan.org/authors/id/S/SN/SNEEX/msg_log.perl for the
source code.  If you have any questions do not hesitate to contact me at
sneex@usa.net  -  I try to write scripts that are more understandable rather
than using some obscure or 'neat-o' Perl syntax feature.

Other URLs which may be of interest:
          http://jacksonville.pm.org
          http://www.cpan.org/authors/id/S/SN/SNEEX/
          http://web.fccj.org/~wcjones/

Thx,
-Sneex- :]
_________________________________________________________________________
Bill Jones  | Data Security Specialist | http://www.fccj.org/cgi/mail?dss
FCCJ  |  501 W State St  |  Jacksonville, FL 32202  |  1 (904) 632-3089

$_="Jacksonville Perl Mongers";while(/([Jacksonville Perl Mongers])/g){
print join(" ",map{defined $_ ? $_ : ""}$`,$&,$',$+),"\n";}