tmitz

	* リリースマネージメントについての話で依頼
		* Googleの話だけではなくで、今までの経験
		* 大規模向けの話

	* 大規模ソフトウェア開発の一般的な話
		* 「大規模」の前提　＝　失敗が許されないもの
		* なので、非常に堅いプロセスを選ぶ
		* 人月が大きい案件はコントロールが効かない・わからなくなりやすい
			* それをmanaged・controlすることが重要

tmitz

# ホットスタンバイがバックアップじゃないとかその手の話はとりあえず置いておきます
#
# なぜこんな間抜けな事故が起きたかについてだけ想像
#
# 1. いろんなサーバーメンテナンスをスクリプトでやっていた
# 2. スクトプトは随時使い回したり書き換えたりして使っていた
#
# という状態であったと推測する。中小規模自社サービスとかやってるところとかもわり
# とこうなんじゃないですかね。ホスティングでそのレベルでいい加減なのどうなんでし
# ょうか。

tmitz

use strict;
use warnings;
use Linux::Smaps;
use List::Util; # not core module

@ARGV or die "usage: %0 [pid...]";

my $memory_total = `cat /proc/meminfo | grep MemTotal | awk '{print \$2}'` * 0.7; # -30% memory total
my @shared;
my @rss;

tmitz

String.prototype.startsWith = function (s) {
    return this.indexOf(s) == 0;
}

Element.prototype.empty = function() {
    while (this.firstChild) this.removeChild(this.firstChild);
}

document.addEventListener("DOMNodeInserted", function(e) {
    var line = e.target;

tmitz

$(function() {
  var n        = 10;         // 初期状態で表出したいlistの個数
  var contents = '.list li'; // 対象のlist
  var trigger  = '.trigger'; // スイッチ

  // listがn個以上ある場合
  if ($(contents).length > n) {
    // server sideでやって欲しい
    // span は追加してもた
    if ($(contents).eq(n).is(":hidden")) {

tmitz

--- cpanm       2012-12-27 16:00:28.000000000 +0900
*************** $fatpacked{"App/cpanminus/script.pm"} = 
*** 418,423 ****
--- 418,424 ----
            'i|install' => sub { $self->{cmd} = 'install' },
            'info'      => sub { $self->{cmd} = 'info' },
            'look'      => sub { $self->{cmd} = 'look'; $self->{skip_installed} = 0 },
+           'download-only!' => \$self->{download_only},
            'self-upgrade' => sub { $self->check_upgrade; $self->{cmd} = 'install'; $self->{skip_installed} = 1; push @ARGV, 'App::cpanminus' },
            'uninst-shadows!'  => \$self->{uninstall_shadows},

tmitz

[user]
    name = mitz
    email = [email protected]
[color]
    ui = auto
    status = auto
    diff = auto
    branch = auto
    interactive = auto
    grep = auto

tmitz

http://www.facebook.com/video/video.php?v=631726942083
http://www.facebook.com/video/video.php?v=631764536743
http://www.facebook.com/video/video.php?v=631784112513
http://www.facebook.com/video/video.php?v=631768394013

tmitz

" Show <TAB> and <CR>                                                                                                                                                                                                                    
set list                                                                                                                                                                                                                                 
set listchars=tab:>-,trail:-,extends:>,precedes:<

tmitz

#!/usr/bin/env perl

use strict;
use warnings;
use utf8;
use v5.18.1;
use Benchmark qw/:all/;
use Cache::Memcached::Fast;
use Digest::MD5 qw/md5/;
use RedisDB;