in reply to Using map to Add a Line Breaks to a List

Untested but i think this should work: 
print map {/(.+)\./ ; $1 . "\n"} sort(RetrieveIllustrationList($cl_use
+rinput));

[download]

In Section Seekers of Perl Wisdom