set fileList to do shell script "perl -e \"print \\\"'\\\", join(\\\"' '\\\", sort(split (/\\t/, '" & 篠 fileList & "'))), \\\"'\\\";\"" 、ヒ、キ、ソ、鬣ケ・レ。シ・ケ、ャニ辰討い討眤臂翩廚澆燭い覆鵑世韻 そういうことではないの?