Global symbol "@sorted" requires explicit package name

This basically means "you did not declare variable @sorted". So you need to put a my in front of the first occurrence of @sorted, $xmlfile and so on.