  subr foo() {
    print "k is [".k."]"
  }
  for (k,v in $*) {
    call foo()
  }

