##use:runsub whattodo;
##whattodo:if $actor eq $target then blah else end;
##blah:
say 'msg',"SCHSHSHHHHHCSHHHHCSHPSHHCHSHPSHSCHSPHCSHHSHHSH!";
say 'msg',"[$init_obj] should turn on the SNES because the TV doesn't have cable";