; Execute a command everywhere we're connected
; Posted on the TF list by David Moore <dmoore@UCSD.EDU>
/def command_in_all =\
    /let body=%{*}%;\
    /command_in_all_ $(/listsockets -s)

/def command_in_all_ =\
    /while ({#}) \
        /repeat -S -w%{1} 1 %{body}%;\
        /shift%;\
    /done