# Set the default current syslog file name here to read $SYSLOGFILE = 'all-debug.txt' ; # Set the correct path to syslogs if rotation is performed. # Should work better with daily rotation to view daily information $LOGDIR = "d:\\syslogs" ; opendir (LOGDIR,$LOGDIR) ; @Files = readdir(LOGDIR) ; closedir LOGDIR ; #Build user interface print "Content-type: text/html \n\n"; # Call 2nd script to parse the desired logfile with the options with the action method print <<"EOL";
INFOSEC Log Server Alert Review

EOL print <<"EOL";
Select options for report
Number of recent alerts
Type of alert
Type of Event
Search ? Search string
Logfile Date










 Produced for Information Security Department
 By Bobby Brown bbrown\@netsecadmin.com
EOL