ls | perl -pe'$i=$.;s//\e[3@{[$i++%7+1]};1m/g;END{print "\033[0m"}'