Welcome to the monastery! :)

As others already pointed out, you are reading a complete line, including the EOL-symbol at the end.

The command for reading just one character, without needing to wait for a return is getc

(I found it by googling "read one character perl")

Please have also a look at How do I compose an effective node title?, good titles will help you here a lot :)