##use:runsub whattodo;
##whattodo:if $actor eq $target then toilet else end;
##toilet:
say 'msg',"[$init_obj].... you know what? You know what happens";