sub mk_tagger ($tag) {
    -> { "<$tag>$^txt</$tag>" }
}