function ret = caesar (string, key)
   string = lower(string(isletter(string)));
   ret = char(mod(string - 'a' + key, 26) + 'a');
endfunction