kentaro

　　 _,,....,,_　 ＿人人人人人人人人人人人人人人人＿
-''":::::::::::::｀''＞　　ゆっくりした結果がこれだよ！！！　＜
ヽ:::::::::::::::::::::￣^Ｙ^Ｙ^Ｙ^Ｙ^Ｙ^Ｙ^Ｙ^Ｙ^Ｙ^Ｙ^Ｙ^Ｙ^Ｙ^Ｙ^￣
　|::::::;ノ´￣＼:::::::::::＼_,. -‐ｧ　　　　　＿_　　 _____　　 ＿_____
　|::::ﾉ　　　ヽ､ヽr-r'"´　　（.__　　　　,´　_,, '-´￣￣｀-ゝ 、_ イ、
_,.!イ_　　_,.ﾍｰｧ'二ﾊ二ヽ､へ,_7　　　'r ´　　　　　　　　　　ヽ、ﾝ、
::::::rｰ''7ｺ-‐'"´　 　 ;　 ',　｀ヽ/｀7　,'＝=─-　　　 　 -─=＝',　i
r-'ｧ'"´/　 /!　ﾊ 　ハ　 !　　iヾ_ﾉ　i　ｲ　iゝ、ｲ人レ／_ルヽｲ i　|
!イ´ ,' |　/__,.!/　V　､!__ﾊ　 ,'　,ゝ　ﾚﾘｲi (ﾋ_] 　　 　ﾋ_ﾝ ).| .|、i .||
`! 　!/ﾚi'　(ﾋ_] 　　 　ﾋ_ﾝ ﾚ'i　ﾉ　　　!Y!""　 ,＿__, 　 "" 「 !ﾉ i　|

kentaro

makeSearchCommand({
  name: "hatena-search",
  url: "http://search.hatena.ne.jp/search?word={QUERY}&site=d.hatena.ne.jp&ie=utf8",
  icon: "http://search.hatena.ne.jp/favicon.ico",
  description:
    "Searches <a href=\"http://d.hatena.ne.jp/\">Hatena::Diary</a> for your words."
});

kentaro

// from http://d.hatena.ne.jp/darashi/20080828/1219894402
makeSearchCommand({
  name: "eijiro",
  url: "http://eow.alc.co.jp/{QUERY}/UTF-8/",
  icon: "http://www.alc.co.jp/favicon.ico",
  description: "Searches <a href=\"http://www.alc.co.jp/\">英辞郎 on the WEB</a> for your words.",
});

kentaro

// ==UserScript==
// @name           Ichigo-Mashimaro
// @namespace      http://kentarok.org/
// @include        http://twitter.com/*
// ==/UserScript==

(function () {
    var textarea = document.getElementById('status');
        textarea.value = '';
    var start = null;

kentaro

(defun scala ()
  (interactive)
  (let ((classname-from-file (substring (buffer-name) 0 -6)))
    (shell-command
     (concat "scalac " buffer-file-name " && "
             "scala  -classpath . " (read-from-minibuffer "classname: " classname-from-file)))))

kentaro

import scala.collection.mutable.ArrayStack

object Kemuri extends Application {
  private var stack: ArrayStack[Int] = new ArrayStack[Int];
  private def eval (c: Char) = {
    if (c == '|') {
      stack.foreach((i:Int) => print(i.toChar))
      stack.clear
    }
    else if (c == '^') {

kentaro

package Acme::LWP::RobotUA;
use strict;
use warnings;
use Carp qw(croak);

use base qw(LWP::RobotUA);

sub request {
    my $self      = shift;
    my ($request) = @_;

kentaro

;;; hatena-let.el --- 

;; Copyright (C) 2010 Kentaro Kuribayashi

;; Author: kentrok@gmail.com <kentarok@gmail.com>
;; Keywords: javascript

;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or

kentaro

require 'formula'

class Bayon <Formula
  head     'http://bayon.googlecode.com/svn/trunk'
  homepage 'http://code.google.com/p/bayon/'

  depends_on 'google-sparsehash' => :build

  def install
    system "./configure", "--disable-debug", "--disable-dependency-tracking",

kentaro

#!/usr/bin/env perl
use strict;
use warnings;
use opts;
use URI;
use URI::Escape;
use Perl6::Say;
use Web::Scraper;

opts my $init   => { isa => 'Str' },