模式中的解析错误：putStrLn可能是由于缺少＆＃39; do＆＃39;？

Question

我是Hakell的新手，在我尝试执行该程序时遇到以下错误。

模式中的解析错误：putStrLn
可能是因为缺少了“做”而造成的？

import Data.List  
import System.IO  

main=do  
    putStrLn"Enter your name"  
    name<-getLine  
    putStrLn("m, "++name)