my $nextMealTime = $mealTime->next ();
sleep (60) while (time < $nextMealTime);