sub i {
  pop eq $_[0] ? @_-1 : (), $#_ ? &i : ()
}