fork download
  1. (<$>)=fmap -- This line is only needed since Ideone uses an old version of GHC.
  2.  
  3. d c='/'<c&&c<':'
  4. f=(span d<$>).break d
  5.  
  6. main = print $ f "AbC1234Xjh2jh"
Success #stdin #stdout 0s 4704KB
stdin
Standard input is empty
stdout
("AbC",("1234","Xjh2jh"))