optim putstr, strlen