Yappo::Hatena::Group::Subtech このページをアンテナに追加 RSSフィード

|

2007-06-29

freenodeからbanされた件 16:54 freenodeからbanされた件 - Yappo::Hatena::Group::Subtech を含むブックマーク はてなブックマーク - freenodeからbanされた件 - Yappo::Hatena::Group::Subtech

ip addressかhostnameでbanされてるから本垢死亡

07/06/29-15:19:44 [<S] :kubrick.freenode.net 465 _OppaiSan :You may not connect to this server:  please do not spam/harass users & channels on freenode. If in error, email staff@freenode.example.net (2007/06/29 06.19)

英語で謝罪文ってどうすればいいんだろう。。。

なんだろう? 07:52 なんだろう? - Yappo::Hatena::Group::Subtech を含むブックマーク はてなブックマーク - なんだろう? - Yappo::Hatena::Group::Subtech

f:id:yappo:20070629080646j:image

use strict;
use warnings;

use Encode;
#use LWP::Authen::Wsse;
use LWP::UserAgent;
use HTTP::Request;
use Mac::Growl;
use XML::Feed;

my $INTERVAL = 15 * 60 * 60;

# Set up the WSSE client
my $ua = LWP::UserAgent->new;
$ua->credentials('mixi.jp:80', '', $email, $passwd);
my $request  = HTTP::Request->new( GET => 'http://mixi.jp/atom/notify/r=10/member_id=' . $member_id );

Mac::Growl::RegisterNotifications("mixi notify", [ 'mixi notify' ],[ 'mixi notify' ]);

my %tag_cache;
while (1) {
    my $response = $ua->request($request);
    die $response->status_line unless $response->is_success;
    my $data = $response->content;
    Encode::_utf8_off($data);

    my %tags;
    my $feed = eval { XML::Feed->parse(\$data) } or die 'Parsing content failed: ' . ($@ || XML::Feed->errstr);
    for my $entry ($feed->entries) {
        Mac::Growl::PostNotification(
            'mixi notify',
            'mixi notify',
            'mixi notify',
            $entry->title . '(' . $entry->summary->body . ')',
        ) unless $tag_cache{$entry->id} || '' eq $entry->summary->body;
        $tags{$entry->id} = $entry->summary->body;
    }
    %tag_cache = %tags;

    sleep($INTERVAL);
}

2007-06-28

WEB+DB PRESS vol.39のサブテク指数を計算する 17:38 WEB+DB PRESS vol.39のサブテク指数を計算する - Yappo::Hatena::Group::Subtech を含むブックマーク はてなブックマーク - WEB+DB PRESS vol.39のサブテク指数を計算する - Yappo::Hatena::Group::Subtech

WEB+DB PRESSのSはSubtechのS

ルール

記事毎に集計する

記事毎のサブテカの人数×ページ数

取材する、される側、もしくは記事の執筆者が記事中の人数にカウント

上に該当しないサブテカの作ったプログラム、記事中に話題になったサブテカの数は、記事に対して1ポイント加算

巻頭のカラー記事は倍率2倍

これら各記事のサブテクポイント雑誌の全ページ数で割って指数を算出

サンフランシスコで昼食を

6P

Alpha Geekに逢いたい

12P + 2P * 2

合計 28P

さぬーうrばびえ

24P

CSS

1P

Ruby on Rails

※注意:matzDHHは両名ともサブテカなので1ページあたり2ポイント

18P

1P(id:secondlife)

合計19P

MySQL&RDBMS

9P

naoya

※注意:Larryは(ry

9P+0.9P(潜在ポイント)

合計9.9P

DSAS

9P

オレンジニュース

2P

計算

ポイント数:107.9

総ページ数: 232ページ

サブテク指数

46.5%


今回のWEB+DBサブテカ率が多過ぎるという事がわかりました

2007-06-18

HTTP::MobileAgentのエンハンスメント 22:34 HTTP::MobileAgentのエンハンスメント - Yappo::Hatena::Group::Subtech を含むブックマーク はてなブックマーク - HTTP::MobileAgentのエンハンスメント - Yappo::Hatena::Group::Subtech

Class::Componentでやってみる

EC naviサービスも一覧に出したい

2007-05-11

takesakoさんのFizzBuzzアセンブリにコメントつけた 03:14 takesakoさんのFizzBuzzアセンブリにコメントつけた - Yappo::Hatena::Group::Subtech を含むブックマーク はてなブックマーク - takesakoさんのFizzBuzzアセンブリにコメントつけた - Yappo::Hatena::Group::Subtech

http://labs.cybozu.co.jp/blog/takesako/2007/05/fizzbuzz_x86.html

x86わかりません><

00000000  B402              mov ah,0x2     #       SETUP PRINT for int 0x21
00000002  BB003A            mov bx,0x3a00  #       bh = 0x3a bl = 0x0
00000005  B93130            mov cx,0x3031  #       ch = '0' cl = '1'
00000008  E82000            call 0x2b      # MAWA: CALL B (1,2)
0000000B  E83000            call 0x3e      #       CALL E (Fizz)
0000000E  E81D00            call 0x2e      #       CALL C (4)
00000011  E83400            call 0x48      #       CALL F (Buzz)
00000014  E81100            call 0x28      #       CALL A (Fizz,7,8)
00000017  E82400            call 0x3e      #       CALL E (Fizz)
0000001A  E82B00            call 0x48      #       CALL F (Buzz)
0000001D  E80E00            call 0x2e      #       CALL C (11)
00000020  E80500            call 0x28      #       CALL A (Fizz,13,14)
00000023  E81700            call 0x3d      #       CALL D (FizzBuzz)
00000026  EBE0              jmp short 0x8  #       GOTO MAWA
00000028  E81300            call 0x3e      #    A: CALL E    
0000002B  E80000            call 0x2e      #    B: CALL C
0000002E  80FD30            cmp ch,0x30    #    C: IF ch == '0'
00000031  7404              jz 0x37        #       THEN GOTO 1
00000033  88EA              mov dl,ch      #       SET ch
00000035  CD21              int 0x21       #       PRINT ch
00000037  88CA              mov dl,cl      #    1: SET cl
00000039  CD21              int 0x21       #       PRINT cl
0000003B  EB22              jmp short 0x5f #       GOTO 4
0000003D  43                inc bx         #    D: bx++ (bl++)
0000003E  B246              mov dl,0x46    #    E: SET 'F'
00000040  CD21              int 0x21       #       PRINT 'F'
00000042  B269              mov dl,0x69    #       SET 'i'
00000044  CD21              int 0x21       #       PRINT 'i'
00000046  EB08              jmp short 0x50 #       GOTO 2
00000048  B242              mov dl,0x42    #    F: SET 'B'
0000004A  CD21              int 0x21       #       PRINT 'B'
0000004C  B275              mov dl,0x75    #       SET 'u'
0000004E  CD21              int 0x21       #       PRINT 'u'
00000050  B27A              mov dl,0x7a    #    2: SET 'z'
00000052  CD21              int 0x21       #       PRINT 'z'
00000054  CD21              int 0x21       #       PRINT 'z'
00000056  84DB              test bl,bl     #       IF bl
00000058  7502              jnz 0x5c       #       THEN GOTO 3
0000005A  EB03              jmp short 0x5f #       GOTO 4
0000005C  4B                dec bx         #    3: bx-- (bl--)
0000005D  EBE9              jmp short 0x48 #       GOTO F
0000005F  B220              mov dl,0x20    #    4: SET ' '
00000061  CD21              int 0x21       #       PRINT ' '
00000063  41                inc cx         #       cx++ (cl++)
00000064  38F9              cmp cl,bh      #       IF cl == bh ( IF cl > 9);
00000066  7508              jnz 0x70       #       THEN NOP ELSE GOTO 5
00000068  B130              mov cl,0x30    #       cl = '0'
0000006A  FEC5              inc ch         #       ch++
0000006C  38FD              cmp ch,bh      #       IF ch == bh ( IF ch > 9)
0000006E  7401              jz 0x71        #       THEN GOTO END
00000070  C3                ret            #    5: RETURN
00000071  B8004C            mov ax,0x4c00  #  END: SETUP END for int 0x21
00000074  CD21              int 0x21       #       END
|