1 2 3 4 5 6 7 8 9
module Main where (|>) :: a -> (a -> b) -> b (|>) = flip ($) main = "olleH" |> reverse |> (++"!") |> print
1
"Hello!"