##use:runsub whattodo;
##whattodo:if $actor eq $target then big else end;
##big:
say 'msg',"[$actor] turns on";
say 'msg',"there's a Chicago White Sox game on and they are winning 5-2 against the St. Louis Cardinals";