Question

this is my code:

askPointer = do
  input <- getLine
  let newInput = map toUpper input
  [..here I will re-use new Input..]
  return ()

Is it possible (maybe using lamba notation), to make this code shorter in one line only?

My attempt has been unsuccessfully:

input <- (\a b-> do toUpper (b <- getLine ) )

Any suggest?

Edit: little edit to make this question looking for more generic answers (not limiting to returning functions)

Answer 1

This should work:

askPointer = getLine >>= return . map toUpper

If you import Control.Applicative you can make it even shorter:

askPointer = map toUpper <$> getLine

Considering last edit:

input <- getLine >>= return . map toUpper

or

input <- map toUpper <$> getLine