print map {
        $_->[0]."\t".$_->[2]."\t".$_->[3]."\n";
} @sorted;