(whilet l(readline)pr.l)