fork download
  1. USING: kernel io regexp sequences unicode.case ;
  2. readln R/ [^a-zA-Z]+/ re-split
  3. [ >title ] map
  4. "" join print
Success #stdin #stdout 0.28s 164096KB
stdin
ABCDEFG1234567ASD123453ASQ213abcasfda!!!
stdout
AbcdefgAsdAsqAbcasfda