in reply to Re: sorting numbered words
in thread sorting numbered words

or you can also use Sort::Key::Natural that is much faster! 
use Sort::Key::Natural qw(natsort);
@sorted = natsort(@data);

[download]

In Section Seekers of Perl Wisdom