$str =~ /^fw/          ? { @array = NT::FW->extract($content, %CFG) }          :
  $str =~ /^vrf/         ? { @array = NT::VRF->extract($content, %CFG) }         :
  $str =~ /^vlan/        ? { @array = NT::VLAN->extract($content, %CFG) }        :
  $str =~ /^portchannel/ ? { @array = NT::PORTCHANNEL->extract($content, %CFG) } :
          return;