sasha1sum

module Main where

-- fold an operation down a list of lists
foldleach :: (a -> b -> a) -> a -> [[b]] -> [a]
foldleach f b xs = map (foldl f b) xs

foldl1each :: (a -> a -> a) -> [[a]] -> [a]
foldl1each f xs = map (foldl1 f) xs

-- find combinations from list

sasha1sum

#!/usr/bin/ruby

require 'nokogiri'
require 'open-uri'

class PlayEntry
  def initialize(package)
    @package = package

    url = "https://play.google.com/store/apps/details?id=#{package}"

sasha1sum

#!/usr/bin/ruby

$threshold = 20
/Discharging, (\d+)/.match(`acpi`) do |v|
    print "\a" if v[1].to_i < $threshold
end

sasha1sum

module Natural where

data Natural = Zero | Inc Natural

instance Eq Natural where
  (==) Zero Zero = True
  (==) (Inc a) (Inc b) = a == b
  (==) a b = False

instance Ord Natural where

sasha1sum

Github/Jenkins Hook with AWS Lambda

Setup

• Run github_hook_cf.py to generate the cloudformation template (requires troposphere).
• Run the cloudformation template in desired region
• Once complete, take the values of the outputs and register in Github (Settings -> Webhooks & services -> Amazon SNS), this can be done on a repo or organization level
• Add the created SNS topic to the generated lambdas event source¹
• Go to the Advanced Settings settings in the lambda configuration and add it to the VPC if needed.²

sasha1sum

S3_BUCKET = YOUR_BUCKET
S3_PREFIX = YOUR_PATH

all: build

upload: reverse_cat.zip reverse_cat_cf_template.json
	aws s3 cp reverse_cat.zip s3://$(S3_BUCKET)/$(S3_PREFIX)/reverse_cat.zip
	aws s3 cp reverse_cat.zip s3://$(S3_BUCKET)/$(S3_PREFIX)/reverse_cat_cf_template.json

build: reverse_cat.zip

sasha1sum

set autochdir
set nocompatible 
filetype off

set rtp+=~/.vim/bundle/Vundle.vim
call vundle#begin()

" Plugins
Plugin 'gmarik/Vundle.vim'
Plugin 'PProvost/vim-ps1'

sasha1sum

#!/bin/bash

for f in *; do
  echo $f
  pv $f | md5sum - | sed "s/-$/$f/" >> checksum.md5
done

sasha1sum

Keybase proof

I hereby claim:

• I am alecgoebel on github.
• I am agoebel (https://keybase.io/agoebel) on keybase.
• I have a public key whose fingerprint is C87E E1CA E4CC F114 6E35 D9D0 0DD5 482C C714 8C4D

To claim this, I am signing this object:

sasha1sum

module PPAP where

-- Objects are either a unit of something (Thing) or some combination (Union)
data Object = Thing String
            | Union Object Object

instance Show Object where
  show (Thing name) = name
  show (Union a b)  = show a ++ "-" ++ show b