$farmer->move_flock($pasture); $farmer->monitor_flock(); $farmer->move_flock($home); #### $farmer->move_flock($pasture); $farmer->monitor_flock(); $farmer->move_flock($home); $farmer->other_important_work(); #### $shepherd_boy->move_flock($pasture); $shepherd_boy->monitor_flock(); $shepherd_boy->move_flock($home); $farmer->other_important_work(); #### $sheep_dog->move_flock($pasture); $sheep_dog->monitor_flock(); $sheep_dog->move_flock($home); $farmer->other_important_work(); #### $sheep_dog->monitor_flock(); #### $sheep_dog->{brain}{task}{monitor_flock} = 1;