[sreek]

the letters are appended to $name through out the until loop. Thats why you are getting previous name to be appended and length of the name increases.

add $name=""
in the first line of the until loop