##use:runsub isitme;

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

##smashit:
say 'sound',"Smash! Squish! Smash! Squish!";

say 'sound',"[$init_obj] uses [$actor] to pulverise the closest object into goo";