[Haskell-beginners] about "putStr"

GHC 8.6.5 ===== import Data.Char main = do putStr "Give me some input: " l <- getLine putStrLn $ map toUpper l ====run==== my str Give me some input:MY STR ===not:=== Give me some input:my str MY STR -- nowsnow