Name "main::DATA" used only once: possible typo at sort.pl line 45.
<?xml version="1.0"?>

not well-formed (invalid token) at line 1, column 4, byte 4 
 at sort.pl line 45