Skip to content

Instantly share code, notes, and snippets.

Avatar
🌴
On vacation

Hironao OTSUBO motemen

🌴
On vacation
View GitHub Profile
View bench.pl
#!/usr/bin/perl
package ClassMouse;
use Mouse;
has 'ro1' => ( is => 'ro', isa => 'Bool', default => 1 );
has 'ro2' => ( is => 'ro', isa => 'Int', default => 1 );
has 'ro3' => ( is => 'ro', isa => 'Str' , default => '1' );
has 'ro4' => ( is => 'ro', isa => 'ArrayRef' , default => sub { [] });
has 'ro5' => ( is => 'ro', isa => 'HashRef' , default => sub { {} });
has 'ro6' => ( is => 'ro', isa => 'CodeRef' , default => sub { sub {1} });
View fetch-video.pl
#!/usr/bin/perl
# original: http://search.cpan.org/src/MIYAGAWA/WWW-NicoVideo-Download-0.01/eg/fetch-video.pl
use strict;
use WWW::NicoVideo::Download;
use Term::ProgressBar;
use Config::Pit;
use URI;
use HTML::TreeBuilder::XPath;
use Perl6::Say;
View mydictionary.txt
さようなら! http://gyazo.com/ff963bf3962ae877e80c73ca8a7e5caf.png 固有名詞
かお (╬☉д⊙) 固有名詞
かお (゚Д゚) 固有名詞
かお (◔ิД◔ิ ) 固有名詞
かお ╮(╯ε╰)╭ 固有名詞
かお (╯Д╰)σ 固有名詞
かお (◕‿◕✿) 固有名詞
かお (☣‿☣) 固有名詞
ぎすぎす (`Д´) 固有名詞
あせ (;´Д`) 固有名詞
View hatena.group.recententries.user.js
// ==UserScript==
// @name Hatena::Group: Recent Entries
// @namespace http://lowreal.net/
// @include https://*.g.hatena.ne.jp/
// @include http://*.g.hatena.ne.jp/
// @require http://svn.coderepos.org/share/lang/javascript/jsdeferred/trunk/jsdeferred.userscript.js
// @require http://gist.github.com/3239.txt#createElementFromString
// @require http://gist.github.com/46391.txt#duration
// @require http://gist.github.com/120040.txt#ambtime
// ==/UserScript==
View TAP.scala
object Main extends Application {
object TAP {
var number:Int = 1
var directive = ""
def plan (planNum:Int) {
println(
"1.." + planNum
)
View gist:59284
// ==UserScript==
// @name Ichigo-Mashimaro
// @namespace http://kentarok.org/
// @include http://twitter.com/*
// ==/UserScript==
(function () {
var textarea = document.getElementById('status');
textarea.value = '';
var start = null;
You can’t perform that action at this time.