Select Code to Download

{
  'employee' => [
...
                }
              ]
};

@{ $parsed->{'employee'} } = sort { 
    $a->{'empid'} <=> $b->{'empid'} 
} @{ $parsed->{'employee'} };

print XMLout($parsed, NoAttr=>1, RootName=>'employees');

<employees>
  <employee>
...
    <lname>A</lname>
  </employee>
</employees>