@tokens = map{s/\s*$//; $_;}@tokens;  #delete trailing spaces