sub zapwrap {
  return ("$_[0]$_[1]" =~ /^#(#+|=+)$/) || undef;
}