Skip to content

Instantly share code, notes, and snippets.

# coding: utf-8
require "twitter"
def search(target)
result = []
(1..100).each do |i|
result << Twitter.search(target, :page => i, :rpp => 100) rescue break
end
iemon(result.flatten.uniq.sort_by(&:created_at).map(&:attrs))
@mururu
mururu / roman.rb
Created April 25, 2012 14:45
Shinjuku.rb #4
class Integer
def to_roman
raise if self <= 0 || self >= 4000
a = ("%04d" % self).split(//).map(&:to_i).reverse
m = { 1 => 'I', 5 => 'V', 10 => 'X', 50 => 'L', 100 => 'C', 500 => 'D', 1000 => 'M' }
(0..3).inject("") do |s,i|
i = 3 - i
s += case a[i]
@mururu
mururu / add_up.rb
Created May 5, 2012 08:29
配列の各要素数をカウントするやつ
class Array
def add_up
Hash.new(0).tap{|h| self.each{|v| h[v]+=1 } }
end
end
@mururu
mururu / exenv.rb
Created November 13, 2012 00:19
exenv homebrew formula
require 'formula'
class Exenv < Formula
homepage 'https://github.com/mururu/exenv'
url 'https://github.com/mururu/exenv/tarball/v0.1.0'
sha1 '8254e6351c9c5614aaa79923b152671d3585a188'
def install
prefix.install Dir['*']
@mururu
mururu / elixir-build.rb
Created November 13, 2012 00:20
elixir-build exenv formula
require 'formula'
class ElixirBuild < Formula
homepage 'https://github.com/mururu/elixir-build'
url 'https://github.com/mururu/elixir-build/tarball/v20121112'
sha1 '6d3ae172359e26ee94370ce309edad79c996ea78'
head 'https://github.com/mururu/elixir-build.git'
option "without-exenv", "Don't install as an exenv plugin"
@mururu
mururu / git-alive
Created December 12, 2012 02:56
Git custom command to check GitHub system status
#!/bin/sh
curl -s https://status.github.com/api/messages.json | \
ruby -rjson -rtime -e \
'JSON.parse(STDIN.gets).each{|s|c = {"good"=>"\e[32m", "minor"=>"\e[33m"}[s["status"]] || "\e[31m"; puts %{#{Time.parse(s["created_on"]).localtime}: #{c}#{s["body"].gsub("\n", " ")}\e[0m}}'
@mururu
mururu / RESULTS.md
Created November 10, 2015 04:45
Micro benchmark of EVP for AES-CTR in Erlang/OTP

no-EVP

1> c(bench3).
{ok,bench3}
2> bench3:run().
encrypt: 65230 times/sec
decrypt: 67715 times/sec
ok
@mururu
mururu / 0415.scm
Last active December 16, 2015 05:49
(define false #f)
(define true #t)
(define (p a)
(print a))
(define (pb a)
(print a)
(print ""))
@mururu
mururu / 0415.scm
Last active December 16, 2015 11:59
sicp 0422
(define false #f)
(define true #t)
(define (p a)
(print a))
(define (pb a)
(print a)
(print ""))
@mururu
mururu / 0-My-SICP-Template-README.md
Last active December 16, 2015 18:48
aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa

Usage

$ git clone https://gist.github.com/5480012.git chapter1
$ cd chapter1

# create new file
$ make new TARGET=q1
$ ls
0-My-SICP-Template-README.md Makefile README.md q1.scm template.scm utils.scm