複数ホストに ssh しながら tail -F するときにはこうしたらどう? をほんのちょっといじった。
- パスの通ったところに保存する
- 実行権限を与える
複数ホストに ssh しながら tail -F するときにはこうしたらどう? をほんのちょっといじった。
import Control.Lens | |
import Control.Monad | |
import Control.Monad.State | |
import Data.List | |
import qualified Data.Map as M | |
paint :: M.Map (Int, Int) Char -> (Int, Int) -> Int | |
paint mm pos = evalState (go pos) mm where | |
go (i, j) = do | |
b <- use $ at (i, j) |