Haskell - Do while loop
<p>I'm new to Haskell and would be glad if someone would be willing to help me! I'm trying to get this program to work with a do while loop. </p>

<p>The result from the second getLine command gets put into the varible goGlenn and if goGlenn doesn't equal "start" then the program will return to the beginning</p>

<pre><code>    start = do
    loop $ do lift performAction
        putStrLn "Hello, what is your name?"
        name &lt;- getLine
        putStrLn ("Welcome to our personality test " ++ name ++ ", inspired by the Big Five Theory.") 
        putStrLn "You will receive fifty questions in total to which you can reply with Yes or No."
        putStrLn "Whenever you feel ready to begin please write Start"
        goGlenn &lt;- getLine
        putStrLn goGlenn
    while (goGlenn /= "start")
</code></pre>