my %urlhash = (
      b('home')      => '/',
      b('sitedocs')  => '/sitedocs.pl',
      b('switches')  => '/switches.pl',
      b('netdocs')   => '/netdocs.pl',
      );

my @urls;

while (my ($name,$url) = each %urlhash) {
  push @urls, { NAME => $name, URL => $url };
}

$template->param( URLLOOP => \@urls );

__END__

<tmpl_loop name="urlloop">
<a href="<tmpl_var name="url">">
<tmpl_var name="name">
</a>
</tmpl_loop>