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

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