my (@fw, @vrf, @vlan, @portchannel);
  @fw = &collectData('fw', $CFG{$CFG{FW}});
  @vrf = &collectData('vrf', $CFG{$CFG{VRF}});
  @vlan = &collectData('vlan', $CFG{$CFG{VLAN}});
  @portchannel = &collectData('portchannel', $CFG{$CFG{PORTCHANNEL}});