in reply to Sort output

You need to use sort function. Use strict warnings and diagnostics or die

In Section Seekers of Perl Wisdom