while($$queueObject{msmqLookupId} = $$self->{queue}->dequeue())
{
  print "$$queueObject{msmqLookupId}\n";
  &{$$self->{handler}}($queueObject->peekMessage());
}

##</code><code>##

while($$queueObject{msmqLookupId} = $$self->{queue}->dequeue())
{
  &{$$self->{handler}}($queueObject->peekMessage());
}

##</code><code>##

while($$queueObject{msmqLookupId} = $$self->{queue}->dequeue())
{
  &{$$self->{handler}}($queueObject->peekMessage());
  print "$$queueObject{msmqLookupId}\n";
}