xs = "abcdefghijklm"main = print $ do { x <- xs; ['^', x] }
Standard input is empty
"^a^b^c^d^e^f^g^h^i^j^k^l^m"
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!