show all log info related to lager's mailbox size over an entire cluster sorted by message_queue_len, including node names.

gistfile1.erl

1> recon_lib:time_fold(
       N=1000, Delay=10000,
       fun(_) -> {lists:usort(fun({_,X}, {_,Y}) -> X > Y end,
                              element(1, recon:named_rpc(
                                           fun() -> erlang:process_info(whereis(lager_event), message_queue_len) end)
                              )),
                  nostate}
       end,
       nostate,
       fun(Vals,_) -> io:format("~p~n",[Vals]) end,
       nostate
).