@verb #7474:"tell_www_page" this none this rxdo #7407
@program #7474:"tell_www_page" this none this
if (!player:isa($webber))
  return raise(E_PERM)
endif
if (!iobj || !(i = listiassoc("mdstat", iobj)))
  return pass(@args)
endif
if (!(`$string_utils:connection_hostname(connection_name(player)) ! ANY' in {"208.38.9.7", "poison.ous.ca", "dsl-main-208-38-9-7-cgy.nucleus.com"}))
  this.owner:record(tostr("Warning, attempt to send mdstat by ", `connection_name(player) ! ANY', " failed!"))
  return raise(E_PERM)
endif
msg = {"#### Poison.ous has lost a RAID drive! ####", "Output from /proc/mdstat is as follows:", "", @iobj[i][2]}
this.owner:record(msg)
"Last modified by Cecil (#7407) on Wed Apr  2 00:36:17 2003 MST."
.