February 2009
February 27, 2009
�����������������Ï��³��������������¡�APNIC SPEAKER �����������������Ï�¡����������Ï�����\���\���\���\������·���������������������������������������������������������Ï��«��¡��½���������½����������������������̏��������㏢�¹��������¡�ġ����¹������\��\���\��\���������\���\���\���\��������������쏪���������ҏ��µ���»���������������������������������·�����ď�¡�
\��\���\���������ď����������돫���������������𡯏��Ð��¡�APRICOT (Asia Pacific Regional Internet Conference on Operational Technologies)��¡��䏪���䏢�������«������������ JANOG (JApan Network Operators' Group) �����������я��������·�����������Ï��«����
\���\���\���\������¼\�����������������½¾»��ӏ��µ��������������������������¡�(OSI �����������������Ï��������³������������) ������\���\���\������¼������\��\���\���\���\������³����������������������¡��ӏ��³����IPv4 ���̏�����³������¹��������¡ߏ����������я�������¡����������«�����������������������������������я��������«��������¡�IPv6 �����������⏢������������𡯏��������������«���������������������������¼�����������я���������������»�����¹���������������������������µ���������������������������������ޏ��������¹��¡�
����������������¡�\���\���\���\�������������돢���Ï����㏢�������������¹������½�����������µ��������������������������������������������������������������¡�\��\��\���\�ޏ��¼\·\���\��я����������������䏢���������������쏢���������������� IPv6 ���Ð�ޏ�Џ��¹�������������폢�·�������������������������������Ð�ޏ�Џ����������������������Ï������������������폢���������������Ï��������ҏ�¡����� IPv6 ������¾�������������돢������������������������\³\���\���\���\��������ҏ�돫����������Ï�����¹���\���\���\������¼������\��\���\���\���\������ď��������̏�¡�(AP region �������������������돫����¹���³���½��������������) �����叢���������я��������������������������������������������������Ï��½¾��؏��������Ð���·��¡�\���\���\���\������¼\���������\��\���\���\���\������³������������½�����������������������������¡�\��\��\���\�ޏ��¼\·\���\��я����������������Ï������������³�����Ï��������������������Ð�ޏ�Џ��¹�����������я��������������¼�����Ώ����ď����������������쏪���������ҏ��µ���»�����������돢����������·�����ď�¡�
���³���������������Ï�������¡��������«���������«���폪������������¡�����������������¹������²���¾�����������¡�\���\���\���\������¼\�������я�����������\��\���\���\���\������³����������������돢������¡�\��\��\���\�ޏ��¼\·\���\���\���\���\������¼������¼��������؏������������������������ޏ�Џ�����������\��\���\¼\���\������¼\·\���\��я����ҏ��·���������������������������ޏ��������������������«��¡����������������������������Џ����������µ������������·�����ď��̡����¡��µ»��ӏ��������������½���¹���������³����������½Ð���������������·�����ď�¡�
���������½»��Џ��������� APNIC 27 ������\µ\���\���������������������³«���µ���������������������������¹���̏�¡�SlideShare ���������叢���Ï����������á�Ï����������������쏢����������·�����ď�¡�
���������½�������������������������������·�����ď�������������������������������������������¡����������돢����������µ¼��ԏ�����������½��Џ��«������������ Transcript �����ҏ�𡭏�������������������µ��������¡�
²»���¼�����������²��������㏢���������������돢����������³«���µ������������������»�ߏ��������������¹��¡�
������µ������»�ߏ�����½Ð���·�����ď������������¹���̏�¡�¼�����ď�ď�����»�����������돢����������������¾���������»�������돢�����������������¹���̏�¡��¹��𡭏����������������ҏ��������������¼������»�ߏ����������ď�����������¡�\��\�������������µ����������������¡������µ���ߏ�������돪��ߏ��������������Ï�����\���\Ð\���\¹��������¡�²��ď��������«������\���¼�����ҏ�����������¹������������»������\��\·\���\��\·\���²����¹���³��������������¡����������я��������������¹������ޏ�Џ���ޏ��������̡���������������������������Ï��̏�¡�·�����Џ����쏢�������½���½�����������я��«��������ď��\���\���������������\��\·\������������쏢���������Џ������·���������·�����������Ï������������¹��������¡�
\��\���\¼\���\������¼\·\���\��я�������������¡�²���¾���������\���\���\��ď�����\���\��\���\���\���\������������������������������������̏��½¼�����µ�������������������������������������¹���̏�¡�돫�������»���돫�������»��⏪�½¼�����µ�����������돢¡��������������������������·������½��ҏ������������������������\���\Ð\������쏢�������½¼�����µ���������������¹��¡�
�돫��ޏ�Џ�¡�stenograph ������ Google ²��������䏢���������¹��������������¡����������Ï�����������\���\Ð\���\¹������»����������������������������������«�����ҏ�𡭏���������돢�ޏ��������¹��¡�
���������̡돫����������������·�����ď��̏�¡���¾���\��\���\���\�돪���䏪�������������ޏ�������������¡�IPv4 ������³��������������ӏ�����²������½������\���\���\���\������̏�����³������¹�������������̢�������¹�����������������������������������������¹��¡�
���½������¾���������\³\���\���\���\������̏��Ð�ޏ�Џ��·�����������������������������������������Ï�����������¡�\���\���\��Ѣ�������̏�����\���\��������䏪��������ҏ����������������������������������Ώ����ď���������������������������������������¡«���������������������������������������������«�������������Ð�ޏ�Џ����������������㏢���������������������Ï��³���������������¹��¡�
�돪�¹���¼«�������������������������¹��������������������¡��ӏ��³���������̏�����\³\¹\������̏��«���«���������������¹���̏�¡���³������·���������«������\���\���\���\¹\���\���\���\¹������¼��돢���������Ï����叢���Ï��̏�����¼���������������»�ߏ��������������¹��¡�
\���\���\��я���������\���\����돪�¹��ԏ����������������������ӡ돫������Ï�����������»�ߏ����Ï�����������¡���\���\���������\��\���\���\�돪���䏪��������������������㏢������¡«�����ď����䏢�«���������������«�����������叢����������¡������¹������\���\���\���\������̏��������������������Ð���·��������¡�IPv6 ������ IPv4 �����������������㏢������¡�\��\���\���\³\��������쏢���������������叢���������я�����\���\���\���\������̏��µ�����������������������Ï��³���������������¹��¡�
���«��������������������������¡���\���\���\���\������̏������я��������������������������«�����������Џ�𡯏�������������¡ߏ����������������Ï��³��������������������������¡���IPv4 ���·���«»�����𡯏��������������½¾��؏�������¡�����������¾�����������������������ď��¹�����������叢������������ߏ����ď����쏢����\���\���\���\���\������̏���������¡ߏ����������������Ï��³�����������ҏ�����������¼«³Ð���¹�����������㏢��������������«�������������������������»�����я�¡�
·����������¡�»������̏����������������ď�������������������IPv6 ²½������������²��ď����������Џ��·��������������������������¡ߏ��������������³���������������ޏ��������¹��¡�
���½������������¼���¾��⏢�¹�����������ď�������������������¡�IPv6 ���Ð�ޏ�Џ����������Џ��ޏ����������������돫����������������·��������¡�IPv6 \���\¹\���������������ҏ����Ѣ�����·��������������������¡�EDGE Co.Lab v6 �������ޏ�Џ��������µ�����������������Ώ��������������������«���̏��������·�����������Ï��«��¡�
�돪�²¼������\���\���\�����������������¡���¼��ҏ����¡돪������쏢�µ�����я��� »�������\���\���\�돢����½��Џ����������ď����������������ҏ��µ��������¡���\���\���\������¼\��\���\���\���\���������·������������»������������«���������«��������¡��������·������������\���\���\���\������µ�����������ď����������������ҏ��������½���µ���������������������������¹������������¡��½�����������������������������»²¹������������������µ���������������������������µ��������¡�
����ITpro\«\���\���\���\���\���\¹��¡�IPv4������³������Ð��돫ӏ���¼��������폢�·���������������«������������Web\��\��\���������IPv6���������Ð�ޏ�Џ��µ���»������7����������������������¡�ITpro
����²��я�¡��³�����Ï�����������µ���²��Џ����ҏ����������ď�����������������·��������¡��·���³����돪�������³�������������������������������Џ����쏪������������������������������¡��䏪���ӏ����������������̏����������Ï�𡭏������������������·�����ď�¡�
\���\���½Ð������
February 25, 2009

���« 9:00 ���½��돩Ώ�����µ���²¹��������¡�26 ����¡����䏢��������������������������������������������؏��������¹��¡�
Hotel Sofitel Philippine Plaza ����������²�돢�«������»��ޏ�����·�����������Ώ��������·�����ď�¡�
�돪�����돢¡���IPv6 ���������«���������������������«��������������������ď������ӏ��� IPv6 ���Ð�ޏ��\µ\���\��������ҏ�돫�������돪������������������������쏢���������㏢� 8 �����������������돪؏�������¡ߏ����������������Ï�����������½��Џ����������ď�������¡��½���������̏�����������«���ޏ�������¡�koyhoge ���µ������������¼���������¼������������������������ď����������������ď����� (�����������̏����������Ï�𡭏������������������¹) ���������������·���������̏�������¡�\��쏢�¼\¹\���\���\���\������\���\���\¹\���\��я��«�������돫������䏢�����������������̏��«���«������������������������·�����ď�¡�
��������������������¡�\��\���\��¡��������ď����������돫�������\���\���\��ď��¼\���\���\��������ҡ����³������·������������������ APNIC (Asia Pasific Network Information Centre) ���«��������������¡���������������¼���»���������¡�APNIC ����¼�����돪����¹��������¡�APNIC 27 ������������������\«\���\���\���\���\���\¹��������¡���IPv6 ���������«���������������������«��������������������ď������ӏ��� (ry��¡ߏ��������������������ҏ��������½���·�����������Ώ��·�������������������³��������¡�
�����������������Ï��³��������������¡��������������쏢����\���\��\���\���\��я�����\���\���\���������¹��ԏ��������³��������������������������¡��䏩���䏢¡�\���\��\���\���\���»��С���ӏ������« 9:00 ���«������ 10:30 ������¹��ԏ���������������������������IPv6 in 3D��¡ߏ�����������������\»\���\·\���\��я�������¡���IPv6 ���������« (ry��¡ߏ����¡ޏ�Џ�����\Ð���¼\���\���\��я����ҏ��������½���µ���»�����������������ď�����������������¹��¡�
\���\���\���\¹\���\������¼\���\���\�돢������¡���µ��¡�\���\���\���\����������������������������������������Ï��������¹���·��¡�·���������쏢���������²���������²»���¼������������µ���µ�����������ď�����������������\���¼\«\���\��ӏ��µ�����������������������Ï��������¹������������¡½��������������������������������������������¡�\���\���\��ӏ��������«��������������������������������������¡�����������������𡭏���������돢�ޏ��������«������»�ߏ��������������¹��¡�
�����������������Ï��³��������������¡�����������\��\���\���\���\���\���\�̏��¼ (¾Ð) ���������������������³�����������ҏ����䏪�������������·�����������쏢�������������¹���̏�¡�\���\���\�돢����½��Џ����������ď�����\���\���\���������¹��ԏ��ޏ����������������������Ï�����������¡��������«���������«������\��\���\���\����������ߏ����������������я��������������������������«������������»�ߏ��������������·�����ď�¡�
���������½����½��쏢���������������ď���������¡������������������������ď����������������ԏ�����½��Џ����� (���«����������������������������) ������»�ߏ��������������¹��¡�
February 17, 2009
19:23 >nipotan< FormValidator::Simple::Plugin::Japanese ��������¡������������������Ï��³��������������¡�²��ď��̏��¹�������������«��¡�\���\���\���������\���\¹\��� 10 �����؏������������������«��¡�������㏢���������Ώ����ď�����
19:24 >nipotan< Number::Phone::JP \���\���\���\��я���������������������½��������������������Ï����������\��\¹
19:24 >nipotan< ���������«��¡�U::RD ���������·��������������¡�N::P::J ���������·������������²���������������������������«
19:24 <hid*******> w
19:26 <Yap***> www
19:27 >nipotan< FormValidator::Simple::Plugin::Number::Phone::JP ���������·�����ď���������
19:27 >nipotan< ���¹��������𡭏��������¹���������¾�������
19:27 <kan**********> www
19:29 <hid*******> CPAN���������¹������\������¼\���\¹\��⏢�¼\¹������²��Џ�����\���\¹\���10�����؏��������������¹������
19:29 <tok***********> ���������������¼
19:29 <tok***********> �����䏪���ӏ��������¹�������������������������������������������������������¹���«������������µ������̏��¹������
19:30 <tok***********> Acme ������»��������������叢�������¹�������������̏������������ď����������Ï�����
19:30 <tok***********> Acme::Super::Hyper::Very::Long::Long::Module::Name.pm �����Ώ����ď�����������
19:30 <ots****> Acme::JugemJugemGogouno... ���«�����������쏢����������������
19:30 <hid*******> ���
(2009 ������ 2 ·��� 17 �����䏢�½��돩�)
\³���¼\���:
#!perl use strict; use warnings; use CPAN::Config; use IO::Uncompress::Gunzip qw($GunzipError); use constant PRINT_BEST => 10; my $package_file = sprintf "%s/modules/02packages.details.txt.gz", $CPAN::Config->{keep_source_where}; my %ranking = (); my $z = IO::Uncompress::Gunzip->new($package_file) or die "$GunzipError\n"; while (my $line = $z->getline) { my($package) = split /\s+/, $line, 2; my $length = length $package; $ranking{$length} ||= []; push @{$ranking{$length}}, $package; } $z->close; my $number = 1; my $rank; for my $length (sort { $b <=> $a } keys %ranking) { $rank = $number; for my $package (sort @{$ranking{$length}}) { printf "%2d: %d bytes: %s\n", $rank, $length, $package; ++$number; } last if $number >= PRINT_BEST(); }��������¡�·���²������������³�����Ï����������������ď�������¡�
½����돪� | ������»��⏢ď�� | \������¼\���\¹\��⏢�¼\¹ |
---|---|---|
1 | 96 | eBay::API::XML::Call::AddTransactionConfirmationItem::AddTransactionConfirmationItemResponseType |
2 | 95 | eBay::API::XML::Call::AddTransactionConfirmationItem::AddTransactionConfirmationItemRequestType |
3 | 94 | Perl::Critic::Policy::ControlStructures::ProhibitNegativeExpressionsInUnlessAndUntilConditions |
4 | 92 | eBay::API::XML::Call::AddMemberMessageAAQToPartner::AddMemberMessageAAQToPartnerResponseType |
4 | 92 | eBay::API::XML::Call::AddMemberMessagesAAQToBidder::AddMemberMessagesAAQToBidderResponseType |
4 | 92 | eBay::API::XML::Call::GetLiveAuctionCatalogDetails::GetLiveAuctionCatalogDetailsResponseType |
4 | 92 | eBay::API::XML::Call::GetStoreCategoryUpdateStatus::GetStoreCategoryUpdateStatusResponseType |
4 | 92 | eBay::API::XML::Call::ValidateTestUserRegistration::ValidateTestUserRegistrationResponseType |
9 | 91 | eBay::API::XML::Call::AddMemberMessageAAQToPartner::AddMemberMessageAAQToPartnerRequestType |
9 | 91 | eBay::API::XML::Call::AddMemberMessagesAAQToBidder::AddMemberMessagesAAQToBidderRequestType |
9 | 91 | eBay::API::XML::Call::GetLiveAuctionCatalogDetails::GetLiveAuctionCatalogDetailsRequestType |
9 | 91 | eBay::API::XML::Call::GetStoreCategoryUpdateStatus::GetStoreCategoryUpdateStatusRequestType |
9 | 91 | eBay::API::XML::Call::ValidateTestUserRegistration::ValidateTestUserRegistrationRequestType |
���½¼�����������������³���¹���¹�����������������¡�¡�
�����������������Ώ�������¡�������������������������������������������������·���²���������������������¡�10 �돪����������������·���«½Ð���·���������������������������¹���̏�¡�1,000 �돪�������������½Ð���·������ (�����������������Ώ����� 56 ������»��⏢���� 906 �돪�\���\��������������������Ï������� 98 �������������������ď�����������¡�1,000 �돪�������������������������ď�ԏ����� 1,003 ������) ¾���¹�����¡�
eBay::API::XML::
���«������»����������������������������� 498 ������Perl::Critic::
���«������»����������������������������� 127 ������perfSONAR_PS::Datatypes::v2_0::
���«������»����������������������������� 55 ������UMMF::UML::MetaModel::
���«������»����������������������������� 46 ������UMMF::UML_1_5::
���«������»����������������������������� 45 ������
���½���·��������¡½�����叢���������ď��·��������¡�
Acme::
���«������»���������������������������������¡�1,000 �돪����������������������������� 0 ���������������·�����ď�¡����µ������¡��¹��𡭏��������¹��������������������������������¾����돢����¹�����𡯏�������¡�\���\���\�ߏ����������ӏ�����½Ð������\���\���\���\¹����������������
�����Ώ����я�������������\����������������������
²�������������µ���������������»��ҏ��������«��������������\����������������������������
February 13, 2009
���³�����Ï����������Ï������������������������¼������»�ߏ�������������������¡�iPhone »����������������������������«������²��»�����𡯏����������������������������я���
��������¡�����������\«\�����������������������������돫����������ď�¡�������������¾������·��������������������¡�
#!perl use strict; use warnings; use Time::HiRes qw(gettimeofday); use Term::Screen; use constant DEFAULT_SECONDS => 60; my $secs = int $ARGV[0] || DEFAULT_SECONDS(); my $screen = Term::Screen->new; $screen->clrscr(); my $start; my $end; $screen->at(0, 0)->puts(sprintf("pless any key to start. (%d secs)", $secs)); my $count = 0; my $bpm; while (my $c = $screen->at(1, 0)->getch) { $screen->clrscr(); exit if $c =~ /^[\x03\x04\x1b]$/; $count++; unless ($start) { $start = gettimeofday(); } $end = gettimeofday(); my $diff = $end - $start; $bpm = $diff > 1 ? $count * (60 / $diff) : 0; $screen->at(0, 0)->puts( sprintf("%3dbeats - %.2f BPM (%.3fsecs)", $count, $bpm, $diff)); last if $diff >= $secs; } $screen->clrscr(); $screen->at(0, 0)->puts(sprintf("%.2f BPM", $bpm)); $screen->at(1, 0)->puts('');²»³��⏢���ҏ��¹������������̏�������¡�\���¼\��䏢�¼\���������\���\���\�� (?) ���·�������������돢돢����������������¹��¡�
���½���������½��������¡�BPM ����������㏢���������Џ�����\½\���\�����������ġ����¹��������������������������¡�GUI ����»�����𡯏����������������������������Ï�¡�Џ������������������������ď�������Џ��ޏ�¡�
���½�����я�������ď���������я����������������������������������� JK
February 05, 2009
#!perl use strict; use warnings; use Perl6::Say; my $PRIV_IP_RE = qr{^https?:// \b(?: 10\.(?:\d\d?|1\d\d|2(?:[0-4]\d|5[0-5]))| # class A 172\.(?:1[6-9]|2\d|3[01])| # class B 192\.168 # class C ) \.(?:\d\d?|1\d\d|2(?:[0-4]\d|5[0-5])) \.(?:\d\d?|1\d\d|2(?:[0-4]\d|5[0-5]))\b }xi; for my $url (qw(http://10.10.2.60/ http://www.google.com/)) { say "$url IS " . ($url =~ $PRIV_IP_RE ? "NOT BOOKMARKABLE" : "BOOKMARKABLE"); }·���²���:
http://10.10.2.60/ IS NOT BOOKMARKABLE http://www.google.com/ IS BOOKMARKABLE»²¹���:
�����쏢���������������� iTunes ����������Ï��½��� - ���������������ď����я�����µ���½���
������������������\���\���\���\������¼\��� - �����Ï��\���\��������������������� - \���\������«���������������������������������·���·������\³\���\���\���\�ޏ��¼\·\���\��я���