Haskell มันไม่มี substr ใน standard library จริงหรือ เกรงว่าผมจะหาไม่เจอเอง แต่โปรแกรมนี้ทำงานถูกก็ใช้การได้แล้ว

gistfile1.hs

substr :: [Char] -> Int -> Int -> [Char]
substr str start end = 
  let length' = end - start 
  in (take length' (drop start str))

main = do
  x <- readFile "u8.txt"
  putStrLn (substr x 3 8)