takumikinjo

# -*- mode: ruby -*-
# vi: set ft=ruby :

# Vagrantfile API/syntax version. Don't touch unless you know what you're doing!
VAGRANTFILE_API_VERSION = "2"

Vagrant.configure(VAGRANTFILE_API_VERSION) do |config|
  # All Vagrant configuration is done here. The most common configuration
  # options are documented and commented below. For a complete reference,
  # please see the online documentation at vagrantup.com.

takumikinjo

FROM ubuntu:latest
MAINTAINER Takumi Kinjo

RUN apt-get update
RUN apt-get check
RUN apt-get dist-upgrade -y

RUN apt-get install -y apache2

# See http://www.kstaken.com/blog/2013/07/06/how-to-run-apache-under-docker/

takumikinjo

.vagrant

takumikinjo

#!/usr/bin/env perl                                                                                                                                                                          

# outlinefill.pl <outline indent chars> <output delimiter>                                                                                                                                   

@b = ();

while (<STDIN>) {
    chomp;
    @a = split /$ARGV[0]/, $_;
    @b = () if ($#a < $#b);

takumikinjo

# . <(curl -L http://goo.gl/pdDKD)

# e.g.: jked /etc/hosts:3:
function jked {
     file=`echo "$@" | sed 's/[:]/ /g' | awk '{print $1}'`
     n=`echo "$@" | sed 's/[:]/ /g' | awk '{print $2}'`
     if echo "$n" | grep '^[0-9]*$'; then
          vi "$file" +"$n"
     else
          vi "$file"

takumikinjo

*.elc

takumikinjo

Register users and memberships to Redmine.

takumikinjo

#!/usr/bin/env bash

# tested on ubuntu12.04 server
# this cannot perform on lion. lion's ed command does not have 'y' command.

# rails new my-app
# cd my-app
# bash < <(curl -s https://raw.github.com/gist/2862788/ed729517cc94c3c3aee44bdbec1f3039184d5181/startup.sh)

git init

takumikinjo

;; Usage:
;;
;; (defun snake-camel () (interactive)(kill-new(upcase-first(snake-to-camel(car kill-ring)))))
;; (defun camel-snake () (interactive)(kill-new(upcase(camel-to-snake(car kill-ring)))))

(defun snake-to-camel (s)
  ""
  (setq s (downcase s))
  (if (string-match "_" s)
      (concat (let ((fs (substring s 0 (match-beginning 0))))

takumikinjo

# -*- coding: utf-8 -*-
# lambda で Proc オブジェクトを作る
def foo(v)
  f = lambda { |a, b|
    puts "#{a}, #{b}, #{v}"
  }
end

# Proc.new で Proc オブジェクトを作る
def bar(v)