perl -e'@arr=qw(k r o d c d n a c l l o r t c a c m a c i c e m c d n i m c t n o d c e s a e l p); s/c/ / for @arr;print reverse @arr;print"\n";'