connstat: awk -> haskell