$xmlstr = {
              source=>[{abc=>[{uname=>["USER"],dbcrdn=>["PWD"],paridn=>["XYZ"],osath=>["0"],}]
           }

print XMLout($xmlstr,RootName => "root");