sub list {
  wantarray ? @_ : $_[-1];
}