Update Main.hs

Used new combinators from regex