##use:runsub isitme;

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

##talktoit:
say 'sound',"Glug glug glug glug";

say 'sound',"[$init_obj] waters [$actor] and stops when they realise it plastic";