Consumer key: IQKbtAYlXLripLGPWd0HUA
Consumer secret: GgDYlkSvaPxGxC4X8liwpUoqKwwr3lCADbz8A7ADU
Consumer key: 3nVuSoBZnx6U4vzUxf5w
Consumer secret: Bcs59EFbbsdF6Sl9Ng71smgStWEGwXXKSjYvPVt7qys
Consumer key: iAtYJ4HpUVfIUoNnif1DA
Consumer key: IQKbtAYlXLripLGPWd0HUA
Consumer secret: GgDYlkSvaPxGxC4X8liwpUoqKwwr3lCADbz8A7ADU
Consumer key: 3nVuSoBZnx6U4vzUxf5w
Consumer secret: Bcs59EFbbsdF6Sl9Ng71smgStWEGwXXKSjYvPVt7qys
Consumer key: iAtYJ4HpUVfIUoNnif1DA
// Use Gists to store code you would like to remember later on | |
console.log(window); // log the "window" object to the console |
use strict; | |
use warnings; | |
use Config::Pit; | |
use Net::Twitter::Lite; | |
use DateTime; | |
use Encode; | |
use utf8; | |
my $now = DateTime->now; |
// ==UserScript== | |
// @name A smart dashboard have my id | |
// @namespace http://mitukiii.jp/ | |
// @description TumblrのDashboardで自分からReblogされた/自分のidを含んだpostを折り畳むスクリプト | |
// @include http://www.tumblr.com/dashboard* | |
// @author mitukiii | |
// @compatibility Firefox 5.0(Scriptish 0.1), Chrome 12.0.742.112, Opera 11.50 | |
// @charset UTF-8 | |
// @version 0.0.2.20110707180600 | |
// ==/UserScript== |
path = ARGV.shift | |
if File.exists?(path) && path.match(/^(.+)\.(jpe?g|jp2)$/) | |
filename = $1 | |
ext = $2 | |
files = [] | |
10.times do |i| | |
10.times do |j| | |
if i != j | |
files << output = "#{filename}_ikemen_#{i}#{j}.#{ext}" | |
`cat #{path} | sed s/#{i}/#{j}/g > #{output}` # gsed じゃなくて sed にした |
# coding: utf-8 | |
class Cパンツ | |
def initialize(好み = {}) | |
@色 = 好み[:色] || 0xFFFFFF | |
@柄 = 好み[:柄] || :無地 | |
end | |
def 何色? | |
sprintf("%#x", @色) |
slow 遅い | |
fast 速い | |
above より上に | |
below より下に | |
absolute 絶対的な | |
relative 相対的な | |
abstract 抽象的な |
# 厨2病フレーズだけで記述できるプログラミング言語 のイメージ | |
何ッ () | |
もしも それ が 真実 なの ならば——— | |
これ は 大変なことになるぞ! (いや?)\ | |
まぁ…… いい… | |
ククク…… 見せてもらおうじゃないか…… ←\ | |
旋律 の 傀儡師 の 実力とやらを! | |
use Regexp::Assemble; | |
my $ra = Regexp::Assemble->new; | |
$ra->add( '^9m[^0-9a-zA-Z]' ); | |
$ra->add( '[^0-9a-zA-Z]9m$' ); | |
$ra->add( '^9m$' ); | |
$ra->add( '[^0-9a-zA-Z]9m[^0-9a-zA-Z]' ); | |
print $ra->re; #(?-xism:(?:[^0-9a-zA-Z]9m(?:[^0-9a-zA-Z]|$)|^9m(?:[^0-9a-zA-Z]|$)) |