haskellでテキストファイルを読み込んで1行ずつ配列に入れたい

https://www.nslabs.jp/haskell-fileio.rhtml
上記のサイトの「テキストファイルを1行ずつ表示する関数」を「1行ずつ読み込んで多重配列にいれる」という関数に改造したいと考えて下記のコードを書きました
しかしsplitEvery 1 strで
textsample.hs:35:9: error: parse error on input ‘splitEvery’
|
35 | splitEvery 1 str[]--1文字ずつ分割
というエラーが吐かれます
どうしたら動きますか。教えてください

haskell
1text_get_array :: Handle->[a]
2text_get_array fp 
3    |hIsEOF fp ==true =[]
4    |otherwise=
5        let str[] = DTI.hGetLine fp --1行読み込み
6        splitEvery 1 str--1文字ずつ分割
7        str ++ get_and_print fp

"qwertuiop"
"asdfgjkl"
"zxcvbnm"
とサンプルでは出力されるので
[[q,w,e,r,t,u,i,o,p],[a,s,d,f,g,j,k,l],[z,x,c,v,b,n,m]]
という配列を取得したい

行動規範の内容に同意します

回答1件

回答を2つの部分に分けます。1つめは「1行ずつ読み込んで多重配列にいれる」を解決する部分、2つめは掲載のコードの問題点を指摘する部分です。

まず1つめの「1行ずつ読み込んで多重配列にいれる」を実装すると下記のようになります（Wandbox で実行）。

haskell
1main :: IO ()
2main = do
3    c <- getContents
4    let ls = lines c
5    print ls

解説です。

初めに Haskell では配列はほとんど使われません（少なくとも初心者のうちは）。代わりに連結リストを使います。
標準入力を [[Char] の型の値で得るのが getContents です（ドキュメント）。
[Char] は標準で String という別名がついています（ドキュメント）。
getContents の型は IO [String] つまり IO [[Char]] です。
IO a という型の値から a という型の値を取り出すには do 構文の <- という構文を使います。
ですので上記コードでは c は [String] という型になります。
次に lines 関数を使います。
これは String -> [String] という型で、引数の文字列を CR や LF で分割し、文字列のリストとして返します（ドキュメント）。
こうすると ls の型は [String] つまり [[Char]] となります。
これを print で出力します。

次に掲載コードの問題点です。

haskell
1text_get_array :: Handle->[a]                     -- (1)
2text_get_array fp
3    |hIsEOF fp ==true =[]                         -- (2)
4    |otherwise=
5        let str[] = DTI.hGetLine fp --1行読み込み  -- (3)
6        splitEvery 1 str--1文字ずつ分割            -- (4)
7        str ++ get_and_print fp                   -- (5)

この関数は内部に IO の操作をするため返り値の型は必ず IO a という形になります。
hIsEOF は Handle -> IO Bool という型の関数なので、Bool の値を得るためには do と <- の構文を使う必要があります（ドキュメント）。
hIsEOF と同じく Data.Text.IO.hGetLine も Handle -> IO Text という型なので do と <- の構文を使います。また、変数名の後に [] を書く構文はありません。
Haskell では変数を再束縛できないため操作した結果を取得するためには返り値が必要です（純粋な関数の場合）。ここでは返り値がないため操作の結果を捨てていることになります。
ここも同様に get_and_print は IO a のような型の値を返すので do と <- が必要です。