<perl runat=client name=getname return=_getname range=0,10>
if($_[0] ne "")
{
  get ["branche", "~=", $_[0]], "???(db=rubrik)????", "????(template=rubrik)???";
  while(get_next "(rubrik)")
{
  out "$branche - $rubrik<br>";
}
}
</perl>

{
  document.all.out.innerHTML=x+"<br>";
}
</script>

</form>