bob {  
    ed {  
        larry { 
            rule5 {  
                option {  
                    disable-server-response-inspection no;  
                }  
                tag [ some_tag ];  
                from [ prod-L3 ];  
                to [ corp-L3 ];  
                source [ any ];  
                destination [ any ];  
                source-user [ any ];  
                category [ any ];  
                application [ any ];  
                service [ any ];  
                hip-profiles [ any ];  
                log-start no;  
                log-end yes;  
                negate-source no;  
                negate-destination no;  
                action allow;  
                log-setting orion_log;  
            }
            rule6 {  
                option {  
                    disable-server-response-inspection no;  
                }  
                tag [ some_tag ];  
                from [ prod-L3 ];  
                to [ corp-L3 ];  
                source [ any ];  
                destination [ any ];  
                source-user [ any ];  
                category [ any ];  
                application [ any ];  
                service [ any ];  
                hip-profiles [ any ];  
                log-start no;  
                log-end yes;  
                negate-source no;  
                negate-destination no;  
                action allow;  
                log-setting orion_log;  
            }  
        }
    }
}

##</code><code>##

GetOptions (
        "pancfg=s" => \$pan_cfg,
        "outfile=s" => \$outfile
    ) or die("Error in command line arguments.  Arguments:\n\t--pancfg = Pan config file to read.\n\t--outfile = Output file for parsed data.");

#Open the config file and attempt to parse it.
$cs = Config::Scoped->new(
    file     => $pan_cfg,
    warnings => $warnings,
);
$cfg_hash = $cs->parse;