*w[99],s[99];main(c,v){for(;gets(s);printf("Why, %s, good sir or madam, this list is%s in fact a palindrome\n",c?"no":"yes",c?" not":"")){for(v=c=0;w[c]=strtok(c?0:s,", []");)++c;for(;c>0&&!strcmp(w[--c],w[v++]););}}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).