print map { /(.+)\./, "\n" } sort RetrieveIllustrationList( $cl_userinput );