$t = gsub($s,      "l",   "")
