What programming languages are used late at night?

Post by codygman » Tue, Apr 25, 2017, 2:10 AM UTC

i336_ wrote: post #226

scalatohaskell wrote: post #217

Earlier quoted context omitted.

I think it's mostly that I need to write it so little, that I never get to become proficient "enough" with it. There is little motivation to invest hours to learn it properly, because a) I get to write bash scripts so little that b) I would forgot half by next time I use it. I think I'm basically stuck on the worst part of learning curve. Btw I use console for pretty much everything from git shell to vim. But when I…

I see. Okay, well, here's how I'd respond to what you've said. The fact that you're already in the console puts you in a pretty good position: now you just need to stay there whenever you perform complex tasks. I have very few bash scripts myself (the little code I actually have saved is scattered everywhere ; most of my scripts are on some disks that are offline at the moment). Rather, I primarily use the shell as a…

Post by codygman » Tue, Apr 25, 2017, 3:03 AM UTC

i336_ wrote: post #226

scalatohaskell wrote: post #217

Earlier quoted context omitted.

I think it's mostly that I need to write it so little, that I never get to become proficient "enough" with it. There is little motivation to invest hours to learn it properly, because a) I get to write bash scripts so little that b) I would forgot half by next time I use it. I think I'm basically stuck on the worst part of learning curve. Btw I use console for pretty much everything from git shell to vim. But when I…

I see. Okay, well, here's how I'd respond to what you've said. The fact that you're already in the console puts you in a pretty good position: now you just need to stay there whenever you perform complex tasks. I have very few bash scripts myself (the little code I actually have saved is scattered everywhere ; most of my scripts are on some disks that are offline at the moment). Rather, I primarily use the shell as a…

    {-# LANGUAGE OverloadedStrings #-}
    module Main where
    
    import Prelude hiding (appendFile)
    import Data.Monoid (())
    import Network.Wreq
    import Control.Lens
    import Control.Concurrent.Async
    import Data.ByteString.Lazy (ByteString, appendFile)
    
    main = do
      urls  (take 5 url, body)) (zip urls responseBodys)
          httpUrls = filter (\(url,_) -> url == "http:") responseInfos
          httpsUrls = filter (\(url,_) -> url == "https") responseInfos
      mapM_ (appendFile "output1.txt") httpUrls
      exampleSiteResponses  IO [String]
            go urls = do
              line  [line]) -- lol, this is a very bad way to snoc

Post by codygman » Wed, Apr 26, 2017, 1:28 AM UTC

codygman wrote: post #233

i336_ wrote: post #226

Earlier quoted context omitted.

I see. Okay, well, here's how I'd respond to what you've said. The fact that you're already in the console puts you in a pretty good position: now you just need to stay there whenever you perform complex tasks. I have very few bash scripts myself (the little code I actually have saved is scattered everywhere ; most of my scripts are on some disks that are offline at the moment). Rather, I primarily use the shell as a…

Well it's 51 minutes later, and I got to the third bullet point :D EDIT: I tried to focus on readability here. Things could be quite a bit more concise but that requires firmer grasp of interactions between >>=, , and point-free functions. Here's what I have so far: {-# LANGUAGE OverloadedStrings #-} module Main where import Prelude hiding (appendFile) import Data.Monoid (( )) import Network.Wreq import Control.Lens…

    {-# LANGUAGE OverloadedStrings #-}
    module Main where
    
    import Prelude hiding (appendFile)
    import Data.Monoid (())
    import Network.Wreq
    import Control.Lens
    import Control.Concurrent.Async
    import Data.ByteString.Lazy (ByteString, appendFile)
    
    main = do
      urls  (take 5 url, body)) (zip urls responseBodys)
          httpUrls = fmap fst (filter (\(url,_) -> url == "http:") responseInfos)
          httpsResponses = fmap snd (filter (\(url,_) -> url == "https") responseInfos)
      mapM_ (appendFile "output1.txt") httpsResponses
      exampleSiteResponses  IO [String]
            go urls = do
              line  [line]) -- lol, this is a very bad way to snoc

Post by codygman » Wed, Apr 26, 2017, 2:09 AM UTC

i336_ wrote: post #226

scalatohaskell wrote: post #217

Earlier quoted context omitted.

I think it's mostly that I need to write it so little, that I never get to become proficient "enough" with it. There is little motivation to invest hours to learn it properly, because a) I get to write bash scripts so little that b) I would forgot half by next time I use it. I think I'm basically stuck on the worst part of learning curve. Btw I use console for pretty much everything from git shell to vim. But when I…

I see. Okay, well, here's how I'd respond to what you've said. The fact that you're already in the console puts you in a pretty good position: now you just need to stay there whenever you perform complex tasks. I have very few bash scripts myself (the little code I actually have saved is scattered everywhere ; most of my scripts are on some disks that are offline at the moment). Rather, I primarily use the shell as a…

    {-# LANGUAGE OverloadedStrings #-}
    module Main where
    
    import Prelude hiding (appendFile)
    import Data.Monoid (())
    import Network.Wreq
    import Control.Lens
    import Control.Concurrent.Async
    import Data.ByteString.Lazy (ByteString, appendFile)
    import Data.List
    
    main = do
      urls >= mapM_ (appendFile "output2.txt" . view responseBody)
    
    promptUserURLs :: IO [String]
    promptUserURLs = go []
      where go :: [String] -> IO [String]
            go urls = do
              line  [line]) -- lol, this is a very bad way to snoc

    {-# LANGUAGE OverloadedStrings #-}
    module Main where
    
    import QuickScriptLibrary
    
    main = do
      urls >= mapM_ (appendFile "output2.txt" . view responseBody)

Post by codygman » Wed, Apr 26, 2017, 2:20 AM UTC

i336_ wrote: post #236

codygman wrote: post #235

Earlier quoted context omitted.

Eh, I had a mistake. {-# LANGUAGE OverloadedStrings #-} module Main where import Prelude hiding (appendFile) import Data.Monoid (( )) import Network.Wreq import Control.Lens import Control.Concurrent.Async import Data.ByteString.Lazy (ByteString, appendFile) main = do urls (take 5 url, body)) (zip urls responseBodys) httpUrls = fmap fst (filter (\(url,_) -> url == "http:") responseInfos) httpsResponses = fmap snd (fi…

Huh. So Haskell is the language of the missing apostrophe instead of the missing semicolon. (In all fairness, so is Lisp, but it puts the apostrophes on the other side.) I'm curious about "(zip urls response" though. Does that extend to the "responseInfos)" on the next line, or am I reading it wrong? (I noticed the "fmap fst" and "fmap snd".) Wonders where to start to figure out how this works

    out: zip ["a","b","c"] [0,1,2]
    out: [("a",0),("b",1),("c",2)]

    out: fmap fst [(0,1),(2,3),(4,5)]
    out: [0,2,4]

    out: fmap snd [(0,1),(2,3),(4,5)]
    out: [1,3,5]