's-capture2'    => sub { $_=$f; s/^\s*(\S+(?:\s+\S+)*)?\s*$/$1/; },
  'm-capture'     => sub { $_=$f; ($_) = /(\S+(?:\s+\S+)*)/;    },