RosettaCodeData/Task/Exceptions/Haskell/exceptions-4.hs

do
  {- do IO computations here -}
`catch` \ex -> do
  {- handle exception "ex" here -}