my $dtg=qq@\d+\-\d+\-\d+\s\d+:\d+:\d+@; # Date time group
my $logtype=qw@Local\d\.[Error|Critical]@; # Log type
my $ipaddr=qw@\d+\.\d+\.\d+\.\d+@; # IP Address
my $odtg=qq@[A-Za-z]{3}\s\d+\s\d+\s\d+:\d+:\d+:@;
my $select=qq@%FW\-\d+\-\d+@; # FW or PIX? 
my $match_line=qq@$dtg\s+$logtype\s+$ipaddr\s+$otg\s+$select@;