Generate wav files of Mac voices spelling out the alphabet

say [a-zA-Z].sh

#!/bin/zsh

local IFS=$'\n'

for voice in `say -v '?' | cut -c1-20 | sed 's/ *$//g' | tr '[A-Z]' '[a-z]'`
do
  for alphabet in `perl -le 'do { print $_ } foreach (a..z);'`
  do
    if [ ! -d ${voice} ]
    then
      mkdir ${voice}
    fi

    local file="${voice}/${alphabet}"
    `say -v "${voice}" -o "${file}.aiff" ${alphabet}`
    `lame --decode "${file}.aiff" "${file}.wav" && rm "${file}.aiff"`
  done
done