sub foo ($$) {
  print "<@_>\n";
}

foo(@this, %that);  # foo(scalar(@this), scalar(%that));