Skip to content

Instantly share code, notes, and snippets.

View yaotti's full-sized avatar

Hiroshige Umino yaotti

213 followers · 81 following
View GitHub Profile
@yaotti
yaotti / git-alias.zsh
Created December 3, 2009 06:43
# aliases for git
alias g="git"
alias gad="git add"
alias gb="git branch -v"
alias gba="git branch -a"
alias gbl="git blame"
alias gbr="git branch -r"
alias gc="git commit -v"
alias gca="git commit -av"
alias gco="git checkout"
@yaotti
yaotti / csrf.html
Created December 12, 2009 17:05
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>CSRF test</title>
</head>
<body onload="document.getElementById('f').submit();">
<form action="/some/post/url" method="post" id="f" target="ifr">
<input type="text" name="body" value="CSRF!" />
@yaotti
yaotti / func_arg_name.py
Created December 13, 2009 11:13
#!/usr/bin/env python
# coding: utf-8
def say(word=None):
print word
if __name__ == '__main__':
say(word='hi')
say(**{'word': 'hi'})
say(**{'wo'+'rd': 'hi'})
@yaotti
yaotti / git-show-sha1
Created December 14, 2009 14:20
#!/usr/bin/env ruby
commit = ARGV.empty? ? 'HEAD' : ARGV.shift
puts `git log --pretty=oneline #{commit}`.split(/\s+/)[0]
@yaotti
yaotti / rec.py
Created December 17, 2009 05:16
#!/usr/bin/env python
# coding: utf-8
def fact(x):
def factrec(f, n):
if n < 1:
return 1
else:
return n * (f (f, (n - 1)))
return factrec(factrec, x)
@yaotti
yaotti / deal.py
Created December 17, 2009 06:27
#!/usr/bin/env python
# coding: utf-8
# http://ameblo.jp/programming/entry-10001721422.html
class Cards:
@classmethod
def deal(cls, num, string):
cds = [""]*num
for i in xrange(len(string) / num):
for j in xrange(num):
cds[j] += string[i*num+j]
@yaotti
yaotti / sketch.pl
Created December 18, 2009 09:09
#!/usr/bin/env perl
use strict;
use warnings;
use Hash::MultiValue;
use XXX;
my $h = [a => 1, a => 2, b => 3];
my $hm = Hash::MultiValue->new(@$h);
YYY $hm;
@yaotti
yaotti / GET.pm
Created December 28, 2009 04:41
design pattern: Chain Of Responsibility
package HTTP::RequestHandler::GET;
use base qw/HTTP::RequestHandler/;
use strict;
use warnings;
sub handle_request {
my ($self, $request) = @_;
return if $request->method ne 'GET';
warn 'Requested method is GET: ' . $request->uri;
}
@yaotti
yaotti / lang-8.pl
Created January 12, 2010 03:59
#!/usr/bin/env perl
use strict;
use warnings;
use WWW::Mechanize;
use Config::Pit;
my $mech = WWW::Mechanize->new();
my $login_url = "http://lang-8.com/login";
my $response = $mech->get($login_url);
my ( $mail, $password ) = do { @{ pit_get("lang-8.com") }{qw/mail password/} };
@yaotti
yaotti / misc.el
Created February 21, 2010 14:43
(defun c++-debug-print()
(interactive)
(let* ((var-str (read-from-minibuffer "variables (space separated): "))
(vars (split-string var-str))
(dp "cout"))
(dolist (v vars)
(setq dp (concat dp " << " v " << \", \"")))
(insert (concat dp " << endl;"))))