Hatena::ブログ(Diary)

Yet Another Hackadelic

2008-10-17

OpenID 関連の英単語

iVocaでブック作ってみた!作ってみたけど色々びみょー!

2008-03-03 依然としてお腹が痛い訳ですが

酒バトン

id:nipotanから回ってきたお。

酔うと基本的にどうなりますか?

呑み方にも依るし、フェーズにも依るんですけど、

  • 饒舌になる
  • 毒舌になる
  • どっかのタイミングで糸が切れる
  • 記憶が飛び始める
  • 呑みも加速する
  • 会計時の記憶が無い
  • 帰宅するまで周りがやたら心配している

と言う感じ?w

どっかのタイミングで糸が切れる現象が起きるのは余程疲れてるにも関わらず、自重せずガブ呑みした場合のみですがwww

あとアウェイ感のある飲み会ではその現象は一切生じません。

酔っ払ったときの最悪の失敗談は何ですか?

あり過ぎて困る訳ですが、差し支え無い範囲内で。

  • 眼鏡を無くした
  • 給料袋ごと無くした
  • 財布ごと無くした
  • 時の彼女を無くした
  • 帰り道に出会う女性全てに声を掛けた
  • バイクで事故って両手負傷した (靴下すらはけない状態)

などなどorz...

そのときはどのくらい飲みましたか?

まぁ、色々なんですが、

  • ウォッカ一本
  • ワイン2本

とかそういう程度。

ビールとショートカクテル換算だと、

  • ビール3, 4杯 + ショートカクテル4杯

くらいで結構回っちゃいます。そんな強くない。

最悪の二日酔いはどんな感じでしたか?

そのまま持病のヘルニアが悪化して、立ち上がれなくなった。

酔っ払って迷惑かけた人にこの場で謝りましょう

毎回反省はしてるんです><

冷蔵庫に入っているお酒の量は?

自宅では基本的に晩酌しない。

好きな銘柄は?

ビールだと、

  • サッポロ黒ラベル
  • プレミアムモルツ
  • エビス

あとはスピリッツ、特にジンかな。後はベルモットなどの香草系が好きです。

あとはマティーニとかかなりオーソドックスなショートカクテルも好き。

最近最後に飲んだお店は?

一昨日、setoくんの家で、数人で呑んだ。

よく飲む、思い入れのあるお酒5品

  • タンカレーのジン (キャンペーンの時に散々呑まされてタンカレーが嫌いになった)
  • スミノフのウォッカ (あれはショットで呑む物じゃない)
  • ボンベイドライジンで作ったジントニック (サファイヤじゃない)

とか?

バトンのジョッキを渡す人

もう回さないんだからねっ!!!

2007-08-22

LEGO::Colors

タイトル通り、LEGO::Colorsと言うモジュールがCPANにあったので使ってみました。

ソース

#!/usr/bin/perl

use strict;
use warnings;

use LEGO::Colors;
use HTML::Template;

my $template = HTML::Template->new(filehandle => *DATA, option => 'value');
my $param = [];

for my $color_name (LEGO::Colors->get_color_names_for_system) {
    my $color_value = LEGO::Colors->get_color($color_name)->get_html_code;
    push(@$param, { COLOR_NAME => $color_name, COLOR_VALUE => $color_value });
}

$template->param(COLOR_LOOP => $param);
print $template->output;

__DATA__
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="ja" xml:lang="ja">
  <head profile="http://purl.org/net/ns/metaprof">
    <title>LEGO COLORS</title>
    <style type="text/css">
body {
  width: 800px;
}

div.lego-color {
  float: left;
  width: 180px;
  height: 50px;
  margin: 10px;
  font-weight: bold;
  text-align: center;
}
    </style>
  </head>
  <body>
<TMPL_LOOP NAME="COLOR_LOOP">
    <div class="lego-color" style="background-color: <TMPL_VAR NAME="COLOR_VALUE">">
      <p><TMPL_VAR NAME="COLOR_NAME"></p>
    </div>
</TMPL_LOOP>
  </body>
</html>

結果

http://sample.art-code.org/lego/index.html

んー、こんなもんかなぁ?実際のLEGOとは色が違う希ガス。

2007-05-02 赤貧再び

ack --thpppt でちょっと息抜き

App::Ackをいれてる人は下記のコマンドを打ってみましょう。

$ ack --thpppt

で結果ですけども、

_   /|
\'o.O'
=(___)=
   U    ack --thpppt!

ワロスw