my %tmpl_hash = (
    urlloopA => {
        'Home'     => '/',
        'Icons'    => '/icons/',
        'Sitedocs' => '/doc/',
    },
    urlloopB => {
        'Cisco'      => 'http://www.cisco.com/',
        'CPAN'       => 'http://search.cpan.org/',
        'Google'     => 'http://www.google.com/',
        'Perl Monks' => 'http://www.perlmonks.org/',
    },
);

for my $loop (keys %tmpl_hash) {
    my @vars;

    while (my($name, $url) = each %{$tmpl_hash{$loop}}) {
        push @vars, { name => $name, url => $url };
    }

    $template->param($loop, [ @vars ]);
}