Select Code to Download

if (/^node=(\S+).*audit\((\d+\....):(\d+)\)/){}
if (/^node=(\S+) type=EOE msg=audit\((\d+\....):(\d+)\)/){}

#!/usr/bin/perl
use strict;
...
node=xxxxxxxxxx type=EOE msg=audit(1485583201.776:5485082):

## see my posted text...
 ## if ($current_time > $next_cleanup_due) #only every 5+ minutes
...
       }
   }
}