in reply to randomize array

It seems like you just want "a random item from the array" in which case you don't need to sort the array, you just need $username = $usernames[rand(@usernames)], surely?

($_='kkvvttuu bbooppuuiiffss qqffssmm iibbddllffss')
=~y~b-v~a-z~s; print

In Section Seekers of Perl Wisdom