Sitting in chemistry class one day... writing into my notebook... came up with this...

foreach(@teacher)
{
   use strict;
   pop @quiz;
   $homework++;
   $homework++;
   $homework++;
   $boredom++;
}

$still_homework_to_do = $homework;

while(@home)
{
   $tired++;
   while($still_homework_to_do)
   {
      $homework--;
      $tired++;
   }
   if($tired >= 10)
      {$sleep $until_morning;}
}
[download]

Obviously, this doesn't compile, but it get's the point across...

        - Ace "Two programmers walk into a bar, the third ducks"