my $rtrId = '1';
for my $rtr ( keys %{$router_href}) {
        print $router_href->{$rtrId}{routerName}  . " : " . "\n";
        my $rplId = '1';
        for my $pfxList ( keys %{$router_href->{$rtrId}{bgpPeer}} ) {
                print $router_href->{$rtrId}{bgpPeer}{$rplId}{prefixList} . "\n";
                $rplId++;
        }
        $rtrId++
}