hakobe hakobe

hakobe / gist:11257

Created September 17, 2008 16:30


	// 1回生向け課題のめも

	#include <stdio.h>
	#include <stdlib.h>
	#include <string.h>
	#include <ctype.h>
	#include <errno.h>

	const int DEFAULT_RECORDS_LIST_SIZE = 16;

hakobe / gist:11543

Created September 19, 2008 05:06

	// ==UserScript==
	// @name imouto_kabu
	// @namespace jp.hakobe.gm
	// @include *
	// ==/UserScript==

	document.body.innerHTML = document.body.innerHTML.replace(/株/g, '妹'); // 無茶しすぎ

hakobe / gist:11743

Created September 20, 2008 11:42

	/*
	* Tree Style Tab with Fx3 new theme for a right-side tab bar
	*
	* Tree Style Tab with Fx3 new theme
	* http://userstyles.org/styles/4677
	*
	* Apply Mac OS style to Tree Style Tab
	* https://addons.mozilla.org/firefox/addon/5890
	*/

hakobe / gist:12510

Created September 24, 2008 08:41

	my ($address) = Email::Address->parse(q!"DMNG" <[email protected]>!);
	p $address->user; # dummy
	p $address->host; # host

hakobe / gist:13072

Created September 26, 2008 08:59


	require 'test/unit'

	module Test::Unit::Assertions
	def assert_or(*asserts)
	asserts.each do \|a\|
	a[] rescue next
	return
	end
	raise Test::Unit::AssertionFailedError

hakobe / gist:15721

Created October 9, 2008 07:44

	function f(n) {
	setTimeout(function () { alert(n + ' in f') }, 0);
	return n;
	}

	function g() {
	alert(f('1'));
	alert('2');
	alert('3');
	}

hakobe / gist:16396

Created October 12, 2008 13:56


	class Stone
	@@STONE_COLORS = [:white, :black]

	def initialize(heads_color)
	raise "Invalid type" unless @@STONE_COLORS.include?(heads_color)
	@heads = heads_color
	end
	attr_reader :heads # 表の色

hakobe / gist:16906

Created October 15, 2008 13:57

	use strict;
	use warnings;

	package Puu;
	use base qw( Class::Accessor::Lvalue::Fast);
	__PACKAGE__->mk_accessors(qw(nyo nyu));

	package main;
	use Data::Dumper;
	use Perl6::Say;

hakobe / gist:18260

Created October 21, 2008 06:55

hakobe / gist:18502

Created October 22, 2008 01:24