in reply to Entering the land of Perl
perl -e ' print scalar split (//,$ARGV[0]),"\t", (sort split (//,$ +ARGV[0])),"\n"' TGAC [download]