Skip to content

Instantly share code, notes, and snippets.

View akm's full-sized avatar

Takeshi Akima akm

View GitHub Profile
-module(recursive).
-export([split/2]).
-export([fib/1]).
split(D, L) -> split(D, L, [], []).
split(_, [] , R, W) -> [lists:reverse(X) || X <- lists:reverse([W|R])];
split(D, [D|T], R, W) -> split(D, T, [W|R], []);
split(D, [H|T], R, W) -> split(D, T, R, [H|W]).
fib(0) -> 0;
@akm
akm / file0.txt
Created June 30, 2014 15:00
7つのデータベース7つの世界 第3章Riak2日目のハマりどころ ref: http://qiita.com/akm/items/d33472936f6fccf6b26b
$ sw_vers
ProductName: Mac OS X
ProductVersion: 10.9.3
BuildVersion: 13D65
@akm
akm / file0.txt
Created June 16, 2014 10:31
Mavericksでerlang R15B01をインストールする方法 ref: http://qiita.com/akm/items/bf14253a27943b13e79b
kerl build R15B01 r15b01-01
@akm
akm / file0.txt
Last active September 20, 2018 12:11
ブラウザのURLをそのままコピペする方法 ref: https://qiita.com/akm/items/e11a17261f7e1056382a
http://ja.wikipedia.org/wiki/%E3%82%B3%E3%83%94%E3%83%BC%E3%83%BB%E3%82%A2%E3%83%B3%E3%83%89%E3%83%BB%E3%83%9A%E3%83%BC%E3%82%B9%E3%83%88
@akm
akm / file0.txt
Created April 16, 2014 05:05
MongoDB-2.6.0で変わったmongoexportの出力 ref: http://qiita.com/akm/items/528428dc5bc848a3963c
% mongo test --eval "db.d1.drop(); db.d1.insert({no: 1, d: new Date()})" && mongoexport -d test -c d1
MongoDB shell version: 2.4.6
connecting to: test
connected to: 127.0.0.1
{ "_id" : { "$oid" : "534e0af8532dbdbaa7c05783" }, "no" : 1, "d" : { "$date" : 1397623544193 } }
exported 1 records
@akm
akm / file0.js
Created April 15, 2014 12:43
MongoDB-2.6.0で変わったensureIndexの振る舞い ref: http://qiita.com/akm/items/799f2c7a6a6697f25127
% mongo test
MongoDB shell version: 2.4.6
connecting to: test
>
> db.t1.drop();
false
> db.createCollection("t1", {});
{ "ok" : 1 }
> db.t1.ensureIndex({f1: 1}, {uniq: true});
> db.t1.ensureIndex({f1: 1}, {});
インストールしたもの
Emacs-24.3-universal-10.6.8.dmg
GitX-L_v0.8.4.zip
googlechrome.dmg
GoogleJapaneseInput.dmg
Skype_6.8.60.351.dmg
xcode462_cltools_10_86938259a.dmg
xcode4630916281a.dmg
@akm
akm / check_permissions.rb
Created June 18, 2012 14:39
show files or directories which has different uid, gid or permission between current directory's ones
#!/usr/bin/env ruby
base_dir = File.expand_path(".")
base_stat = File.stat(base_dir)
base_dir_permission = base_stat.mode & 0o777
base_file_permission = (base_stat.mode ^ 0o111) & 0o777
f = lambda do |confirmation|
confirmation.puts "current directory: #{base_dir}"
confirmation.puts "base_dir_permission : %o" % base_dir_permission
# -*- coding: utf-8 -*-
require "rubygems"
require "amqp" # requires version >= 0.8.0.RC14
puts "=> Example of automatic AMQP channel and queues recovery"
puts
AMQP.start(:host => "localhost") do |connection, open_ok|
puts "AMQP.start block runs"
# on_open, on_closedに渡されたブロックは、何度再接続をしても最初の一度だけしか呼び出されないが、
@akm
akm / rails_template_base.rb
Created May 29, 2011 14:20
rails template
require 'fileutils'
FileUtils.cp("config/database.yml", "config/database.yml.example")
File.open(".gitignore", "a") do |f|
f.puts "Gemfile.lock"
f.puts ".rvmrc"
end
File.open("config/.gitignore", "a"){|f| f.puts("*.example")}
gem 'factory_girl_rails', :group => [:development, :test]