Problem with XMLout

[Scarborough]

Further to a question I asked about a week ago, I am using XML::Simple to read a list of jobs in the following format

<jobs>
<job name="XYZ.pl">
    <lang>Perl</lang>
    <runs>MON</runs>
    <parameters>
         <op SERVICE="REPORTS"/>
         <op USER="NEON"/>
    </parameters>
</job>
....
</jobs>

There are about 530 of these jobs and XMLin($file) reads them into my hash just fine. I then find which are due today and write a script file to run todays jobs. This works just fine but we are moving to a .NET enviroment and I've been tasked with making an XML file of todays jobs. Fine I think just copy elements of the hash returned by XMLin($file) that I need and pass it to XMLout. But not as easy as that I get
Options must be name=>value pairs (odd number supplied) at perl_job_steps.pm line 87
Line 87 is
print OUT, XMLout(%{$jobs_tody})

Can anyone see an obvious answer, I'm not keen on the idea of changing the format of the XML as the rest of the code works well.

[gellyfish]

XMLout takes a hashref argument not a hash - you don't need to dereference the HASHREF you have.

/J\

[Scarborough]

Thanks that did the trick sometimes I just can't see for looking.
Interestingly the format of the out file is very different to the original file and in XML terms is probably the format I should adopt for the orginal file. Learning something new every day thats what its all about.

[The Mad Hatter]

Look at the options if you want to format the output differently.