@verb #6319:"food" any any any rdo #6319
@program #6319:"food" any any any
names = $string_utils:explode(argstr, ",")
new = $recycler:create(#1777)
new:moveto(this)
new:set_name(names[1])
new:set_aliases(names)
this:tell(new.name, " created.")
"Last modified by Dax (#789) on Sun Aug 16 22:16:13 1998 EDT."
.