Skip to content

Instantly share code, notes, and snippets.

View clairvy's full-sized avatar
☕
Working at Cafe

clairvy

☕
Working at Cafe
47 followers · 36 following
View GitHub Profile
@clairvy
clairvy / gist:38203
Created December 20, 2008 01:56
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
<html>
<head>
<style type="text/css">
h1, h2 {
color : blue;
font-style : italic;
}
.WARNING {
font-weight : bold;
@clairvy
clairvy / gist:55471
Created January 31, 2009 07:21
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
<html>
<head>
<title></title>
</head>
<body>
<h2>17.4</h2>
<h3>17.4.1</h3>
<a href="www.davidflanagan.com" tooltip="good Java/JavaScript blog"
@clairvy
clairvy / *scratch*
Created August 27, 2009 00:58
これわ、gist.el のテストだよ。
@clairvy
clairvy / *eshell*
Created August 27, 2009 03:44
diff --git a/lib/redcloth3.rb b/lib/redcloth3.rb
index e99ccdf..19e9746 100644
--- a/lib/redcloth3.rb
+++ b/lib/redcloth3.rb
@@ -270,7 +270,7 @@ class RedCloth3 < String
@urlrefs = {}
@shelf = []
- textile_rules = [:refs_textile, :block_textile_table, :block_textile_lists,
+ textile_rules = [:block_textile_table, :block_textile_lists,
@clairvy
clairvy / 1.in
Created August 28, 2009 00:21
3
8
6
@clairvy
clairvy / onliner
Created September 10, 2009 08:08
find . -type f -ls |egrep -v '.git'|perl -ne '/ -..([-x])..([-x])..([-x]) /&&do{$1 eq"x"or$2 eq"x"or$3 eq"x"}&&print' | awk '{print $11}'|egrep -vi '\.(pl|cgi)$' | xargs chmod -x
@clairvy
clairvy / *scratch*
Created September 28, 2009 06:51
$ cat a
a b c
d e
f
$ awk '{n = split($0, a); for(i = 1; i <= n; i += 1) { print i, a[i] }}' a
1 a
2 b
3 c
1 d
2 e
@clairvy
clairvy / outputz-growl.pl
Created October 16, 2009 02:53 — forked from typester/outputz-growl.pl
#!/usr/bin/env perl
# -*- coding: utf-8-unix; -*-
use strict;
use warnings;
use Config::Pit;
use Net::Growl;
use WWW::Mechanize;
@clairvy
clairvy / pit.el
Created October 24, 2009 01:00
;;; pit.el --- Manipulate pit data.
;; Copyright (C) 2008 Takeru Naito
;; Author: Takeru Naito <[email protected]>
;; Original: cho45 http://lowreal.rubyforge.org/pit/
;; This file 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 2, or (at your
;; option) any later version.
@clairvy
clairvy / 2009-12-08-162006.php
Created December 8, 2009 08:28
<?php
function fix($f) {
return function($x) use ($f) {
return $f(fix($f), $x);
};
};
$map = function($f, $xs) {
$func = fix(function($sf, $ys) use ($f) {