xintron

func (conn *Conn) Connect(host string) (c net.Conn, err error) {
    log.SetFlags(23)
    log.Printf("Connecting to host: %s\n", host)
    // Wrapp the connection with a secure connection
    if conn.SSL {
        c, err = tls.Dial("tcp", host, conn.SSLConfig)
    } else {
        c, err = net.Dial("tcp", host)
    }
    if err != nil {

xintron

import qualified Data.Text.Lazy as T (Text, lines, unlines)
import qualified Data.Text.Lazy.IO as TIO (interact)

data Command = Next
             | Print

sed :: T.Text -> T.Text
sed t = T.unlines $ concat $ map (runCommands [Print]) $ T.lines t

runCommands :: [Command] -> T.Text -> [T.Text]

xintron

{-# LANGUAGE OverloadedStrings #-}
import Control.Monad (unless)
import Control.Exception (bracket)
import System.Environment (getArgs)
import System.IO (Handle, BufferMode(NoBuffering), hClose, hSetBuffering)
import Data.Time.LocalTime (getZonedTime)
import Network (PortID(PortNumber), connectTo)
import qualified Data.Text as T (Text, append, concat, drop, dropWhile, head, 
                                isPrefixOf, pack, takeWhile, toLower, words)
import qualified Data.Text.IO as TIO (hGetLine, hPutStr, putStrLn)

xintron

getProcessDirectories = getDirectoryContents procPath >>=
    filterM (doesDirectoryExist . (++) procPath) . filter (all isNumber) >>=
    mapM (return . (++) procPath)
  where
    procPath = "/proc/"

xintron

Keybase proof

I hereby claim:

• I am xintron on github.
• I am xintron (https://keybase.io/xintron) on keybase.
• I have a public key whose fingerprint is C405 076E CEF6 FC4B 0E5B E0BA 0070 8663 08C1 7775

To claim this, I am signing this object: