in reply to XML parsing problem.

You forgot to consider the nesting:

$queue_name = $parsed_xml->{'descriptor'}[0]{'inputQueue'}[0]

Hanlon's Razor - "Never attribute to malice that which can be adequately explained by stupidity"

In Section Seekers of Perl Wisdom