## Note that when using value=TRUE, if you transformed `x` in anyway, 
##	 then those transformations will be whats extracted, not the original

files <- dir("~/documents")
files <- toupper(files)
files <- grep("\\.txt$", tolower(files), value=TRUE, ignore.case=FALSE)