while (m<CURRENT=(\S+)>gx)
            {
                $output{$mode}{current} = $1;
                push @{$cfg{$mode}{current}} => $output{$mode}{current};
                $output{$mode}{current} = join("\n",@{$cfg{$mode}{current}});
            }