This is easily scriptable too:
Code:
alias hlist {
  var %i = 1
  if $1 != -w || $0 == 1 {
    echo -aiec info * Showing all hash tables
    while $hget(%i) { 
      echo -ac info2 $ifmatch - $hget($ifmatch).size
      inc %i 
    }
    goto end
  }
  var %a, %w = $iif(* isin $2 || ? isin $2,$2,* $+ $2*)
  echo -aiec info * Showing hash tables matching: $2 - size: $3
  if $3 !isnum 1- {
    while $hget(%i) {
      %a = $ifmatch
      if %w iswm %a { echo -ac info2 %a - $hget(%a).size }
      inc %i 
    }
    goto end
  } 
  while $hget(%i) {
    %a = $ifmatch
    if $3 == $hget(%a).size && %w iswm %a { echo -ac info2 %a - $3 }
    inc %i
  }
  :end
  echo -aiec info * End of matching hash tables list
}

/.timerQ 1 0 echo /.timerQ 1 0 $timer(Q).com