##use:runsub isitme;

##isitme:
if $actor eq $target then sleepinit;

##sleepinit:
say 'sound',"CLANG!!";

say 'sound',"[$actor] makes unseemly obnoxious crashing sounds as [$init_obj] puts [$actor] on so [$init_obj] takes it off";