sub cell_wrap {
    join '', map {"<tr><td>$_</td></tr>"} @_;
}