<perl>
out runtime()."<hr/>";
 foreach(A..Z){
 $t = $_;
  get "Ort~=$_ range=0,1","/Pouraga/geodaten";
  out "$t Einträge: $_amount_query $_amount<br/>";
 } 

out "<hr/>".runtime()."<hr/>";

</perl>