> x <- 'aabb.ccdd' > sub('.*', '', x) [1] "" > sub('bb.*', '', x) [1] "aa" > sub('.*bb', '', x) [1] ".ccdd" > sub('..*', '', x) [1] "aabb" > sub('.*.', '', x) [1] "ccdd"