Select Code to Download

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

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

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