Skip to content

Instantly share code, notes, and snippets.

View sekimura's full-sized avatar

Masa Sekimura sekimura

107 followers · 0 following
View GitHub Profile
@sekimura
sekimura / gist:45915
Created January 12, 2009 07:10
#!/usr/bin/perl
use strict;
use warnings;
use Danga::Socket;
use IO::Socket::INET;
my $conf_port = 20020;
use Socket qw(IPPROTO_TCP SO_KEEPALIVE TCP_NODELAY SOL_SOCKET);
@sekimura
sekimura / gist:46209
Created January 12, 2009 22:50
#!/usr/bin/perl
use strict;
use warnings;
use SVN::Client;
use Data::Dumper;
my $repo = shift || 'http://svn.coderepos.org/share';
my $ctx = SVN::Client->new;
@sekimura
sekimura / gist:67753
Created February 20, 2009 22:37
" highlight tailing spaces
highlight ExtraWhitespace ctermbg=darkgreen guibg=darkgreen
match ExtraWhitespace /\s\+\%#\@<!$/
" 80 chars per a line
highlight OverLength ctermbg=red ctermfg=white guibg=#592929
match OverLength /\%81v.*/
@sekimura
sekimura / gist:67961
Created February 21, 2009 09:04
#!/usr/bin/perl
# ______ ________ __
# /_ __/___ _________ ___ / ____/ /____ _____/ /__
# / / / _ \/ ___/ __ `__ \ / / / // __ \/ ___/ //_/
# / / / __/ / / / / / / / / /___/ // /_/ / /__/ ,<
# /_/ \___/_/ /_/ /_/ /_/ \____/_/ \____/\___/_/|_|
use strict;
use warnings;
@sekimura
sekimura / gist:68351
Created February 22, 2009 05:37
--- lib/platform/COSXScreen.cpp.orig 2006-03-21 21:40:27.000000000 -0800
+++ lib/platform/COSXScreen.cpp 2009-02-22 16:52:45.000000000 -0800
@@ -560,7 +560,9 @@
// hide cursor
if (!m_cursorHidden) {
-// CGDisplayHideCursor(m_displayID);
+ CGDisplayCaptureWithOptions(m_displayID, kCGCaptureNoFill);
+ CGDisplayHideCursor(m_displayID);
+ CGDisplayRelease(m_displayID);
@sekimura
sekimura / gist:74023
Created March 4, 2009 21:43
07/08/08 286.96004 30760 0.009329 http://pc.watch.impress.co.jp/docs/2008/0708/pa_cphdd_mem.htm
07/15/08 282.753828 30093 0.009396 http://pc.watch.impress.co.jp/docs/2008/0715/pa_cphdd_mem.htm
07/22/08 281.760759 30093 0.009363 http://pc.watch.impress.co.jp/docs/2008/0722/pa_cphdd_mem.htm
07/29/08 283.238925 30505 0.009285 http://pc.watch.impress.co.jp/docs/2008/0729/pa_cphdd_mem.htm
08/05/08 273.078944 29452 0.009272 http://pc.watch.impress.co.jp/docs/2008/0805/pa_cphdd_mem.htm
08/12/08 272.126211 29927 0.009093 http://pc.watch.impress.co.jp/docs/2008/0812/pa_cphdd_mem.htm
08/19/08 261.982875 28875 0.009073 http://pc.watch.impress.co.jp/docs/2008/0819/pa_cphdd_mem.htm
08/26/08 264.338074 29029 0.009106 http://pc.watch.impress.co.jp/docs/2008/0826/pa_cphdd_mem.htm
09/02/08 262.685366 28423 0.009242 http://pc.watch.
@sekimura
sekimura / gist:74024
Created March 4, 2009 21:44
price trend PC3-10600 2GB x 2: date usd jpy exchange-rate url
07/08/08 286.96004 30760 0.009329 http://pc.watch.impress.co.jp/docs/2008/0708/pa_cphdd_mem.htm
07/15/08 282.753828 30093 0.009396 http://pc.watch.impress.co.jp/docs/2008/0715/pa_cphdd_mem.htm
07/22/08 281.760759 30093 0.009363 http://pc.watch.impress.co.jp/docs/2008/0722/pa_cphdd_mem.htm
07/29/08 283.238925 30505 0.009285 http://pc.watch.impress.co.jp/docs/2008/0729/pa_cphdd_mem.htm
08/05/08 273.078944 29452 0.009272 http://pc.watch.impress.co.jp/docs/2008/0805/pa_cphdd_mem.htm
08/12/08 272.126211 29927 0.009093 http://pc.watch.impress.co.jp/docs/2008/0812/pa_cphdd_mem.htm
08/19/08 261.982875 28875 0.009073 http://pc.watch.impress.co.jp/docs/2008/0819/pa_cphdd_mem.htm
08/26/08 264.338074 29029 0.009106 http://pc.watch.impress.co.jp/docs/2008/0826/pa_cphdd_mem.htm
09/02/08 262.685366 28423 0.009242 http://pc.watch.impress.co.jp/docs/2008/0902/pa_cphdd_mem.htm
09/09/08 254.16783 27570 0.009219 http://pc.watch.impress.co.jp/docs/2008/0909/pa_cphdd_mem.htm
@sekimura
sekimura / gist:77040
Created March 10, 2009 18:12
var currHhmm;
function refreshClock() {
var d = new Date;
var hh = d.getHours();
var mm = d.getMinutes();
if (hh < 10) hh = "0" + hh;
if (mm < 10) mm = "0" + mm;
var hhmm = [hh, mm].join('');
if ( currHhmm !== hhmm) {
@sekimura
sekimura / gist:86377
Created March 26, 2009 22:05
--- Simple.pm.orig 2009-03-26 15:04:19.000000000 -0700
+++ Simple.pm 2009-03-26 15:04:43.000000000 -0700
@@ -54,11 +54,13 @@
sub view_restricted_resource {
my $self = shift;
+ my ($url) = @_;
return $self->make_restricted_request($url, 'GET');
}
@sekimura
sekimura / gist:89965
Created April 3, 2009 21:01
bug ? Firefox 3.0.8 on Mac OS X
<html>
<head>
<!-- http://labs.qootas.org/tmp/keycode.html -->
<script type="text/javascript">
function $(id){ return document.getElementById(id) }
function test(e) {
if (e.keyCode == 9) {
var ta = $('ta');
ta.value = 'tab';
ta.focus();