while (!$mug->empty())
      {
      slurp($mug;)
      }

##</code><code>##

     {
      slurp(chomp($mug))
     }