Parse and Audit for Firewall, using Perl