in reply to Need to Generate Unique String

You might want to consider using Data::UUID.

In Section Seekers of Perl Wisdom