Hi Martin.

I will not offer an iron-clad guarantee, but I believe that your second try (with the loops) is failing because you are passing the Menu method a code block - in this case, your foreach loop.

I would try reversing it: put the call to $newgen->Menu inside the foreach loop. Of course that means that you'd have to build up $newxml piece by piece using the .= operator rather than all at once.

Like I said, this is just my reaction to it without actually testing...... since you indicated you're new to Perl, I'll offer the following advice that I wish I'd known when I started: if you run your program from the command prompt with the -c option, it compiles it without running it, and seems to give much more informative error messages.

Hope it helps....