Skip to content

Instantly share code, notes, and snippets.

@fuba
fuba / kekka
Created February 21, 2012 12:29
perlのsplitのPATTERN省略した場合の動作
# via perldoc -f split
If PATTERN is also
omitted, splits on whitespace (after skipping any leading
whitespace).
# こう書いてあったら PATTERN は /\s/ だと思うんだけど…
---
- expire: 1352818747
str: 世界のドキュメンタリー
user: fuba
- expire: 1334757727
str: bsシネマ -シネマDO
user: fuba
- expire: 1339404726
str: 酒場放浪記
user: fuba
#!/usr/bin/perl
# libx264-hq-ts.preset -> http://d.hatena.ne.jp/munepi/20091227/1261941397
use strict;
use warnings;
use File::Basename;
use YAML::Syck;
use constant {
FFMPEG_DIR => '/home/ec/src/ffmpeg_x264/ffmpeg', # 自分でコンパイルした ffmpeg のあるディレクトリ, ffmpeg は FFMPEG_DIR/ffmpeg にあることになる
@fuba
fuba / b.hatena.ne.jp.js
Created November 22, 2011 09:14
dotjs script: show all comments on new hatena bookmark
var showAllComment = function () {
$('.entry-block').each(function () {
if (!this.classList.contains('show-all-comment')) {
this.classList.add('show-all-comment');
}
});
};
document.addEventListener('DOMNodeInserted', showAllComment, false);
@fuba
fuba / en.wikipedia.org.js
Created November 22, 2011 04:50
dotjs script: replace Jimmy Wales to relevant image using jpg.to (en.wikipedia.org)
function replaceJimmy () {
var wikiname = $("#firstHeading").text().replace(/\s+/g, '-');
var divs = $("#centralNotice > div");
if (divs.length) {
divs[0].style.backgroundImage = 'url("http://'+wikiname+'.jpg.to")';
$("#cn-bold-blue-text").each(function(){
this.innerHTML = this.innerHTML.replace(/Jimmy Wales/, wikiname);
});
}
else {
@fuba
fuba / ja.wikipedia.org.js
Created November 21, 2011 10:54
dotjs script: replace Jimmy Wales to relevant image using jpg.to
function replaceJimmy () {
var wikiname = $("#firstHeading").text();
var divs = $("#centralNotice > div");
if (divs.length) {
divs[0].style.backgroundImage = 'url("http://'+wikiname+'.jpg.to")';
$("#cn-bold-blue-text").each(function(){
this.innerHTML = this.innerHTML.replace(/ジミー・ウェールズ/, wikiname);
});
}
else {
cluster 1
波動砲‼‼‼ーP
波動砲ーーー?発射PPPPPPPPPPPPPall
波動砲PPPP発射ーP発射ーー?発射PPPPPPPPPPPPP
波動砲‼発射PPPPPPPPPPPPP
波動砲ーー♥♥
波動砲!!鳥大学発射用all
波動砲?発射PPPPPPPPPPPPP
波動砲ーー?発射用意ポポポ
波動砲!
% perl gen_hadouhou.pl
波動!! 波動波動砲ポーポ波動砲ーポポポー?波動砲! …謝ーーーーーポー?発射- http://t.co/wuWVPq1all
♥♥波ポ射(波動砲--!!! 宮川 !
波動砲?用用ー?波動砲、
波動砲×発発射! 泰 ... 波ポ発射大学ーーー?波ポーー用用用人間ごと吹き飛all
波動砲?
波動砲、
波波動!用ー用意! 波動砲! http://t.co/nSfKcsz〝
波動砲『波ポポーーーーポ
♥波動砲?波ーポ射ーーーポポ発発射! .
@fuba
fuba / plus.google.com.js
Created August 3, 2011 02:59
hide suggestions of google+
var hideSuggestion = function () {
$('.a-b-j-xc-fe-z').hide();
$('.a-nb-z').hide();
};
document.addEventListener('DOMNodeInserted', hideSuggestion, false);
$ perl -MEncode -MPerl6::Say -e 'srand(time);my$y=shift;say(encode_utf8 join"",sort{rand($a)<=>rand($b)}split//,decode_utf8($y)) for (0..10);' "ゆりゆらららゆるゆり"
ゆららゆりゆるゆらり
ゆらららりゆゆりるゆ
らゆゆらるりりらゆゆ
ゆらゆゆらりらゆりる
ららるらゆりゆゆりゆ
ゆらるりらゆりゆゆら
らゆゆらるゆりゆりら
らららゆりゆりゆるゆ
ゆらりゆるゆりゆらら