fork download
  1. movies = c('The Kings Of Summer', 'The Words', 'Out Of The Furnace', 'Me And Earl And The Dying Girl')
  2. gsub("(?!^)\\b(Of|In|The)\\b", "\\L\\1", movies, perl=TRUE)
Success #stdin #stdout 0.18s 175424KB
stdin
Standard input is empty
stdout
[1] "The Kings of Summer"            "The Words"                     
[3] "Out of the Furnace"             "Me And Earl And the Dying Girl"