KDDIと米Microfinance International（MFIC）は12月13日、グローバル送金・決済プラットフォーム事業を共同で進めていくことに合意したと発表した。KDDIは12月8日にMFICの第三者割当増資を引き受け、MFICの優先株22.9％相当（20％の議決権の特約付き）を2205万ドルで取得。KDDIはMFICの筆頭株主になる。 提携のサービス第1弾として、KDDIのグループ会社であり、仮想移動体通信事業者（MVNO）である米Locus Telecommunicationsが米国で移民向けプリペイド送金サービスを2011年1月から提供する。このサービスは、米国で初めてのものになるという。 Locusのプリペイド送金サービスの仕組みは以下の通りだ。ユーザーはMFICの直営店や提携事業者店舗などで登録し、Locusから送金用プリペイドカードを購入する。その後でユーザーはL
2007年04月25日02:00 カテゴリLightweight Languages perl - PoCo::Client::HTTP < LWP::UserAgent->new(keep_alive => 1) POEが大流行しています。私自身POEはちょくちょく使っているのですが、サーバーはとにかくクライアントとなるとそれほど使っていません。 理由は、以下ではありません D-5 出張版 - [開発] PoCo::Client::HTTP decodes content (w/o Permission) Kazuho@Cybozu Labs: Re: PoCo::Client::HTTP が勝手に文字コードを変えてしまう件 理由は、もっと単純。非効率だからです。 以下をご覧下さい。ここでは10000bytesのコンテントを同じサーバーに100回取りに行っています。 % perl lwp
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
最近、IRCチャットを始めたので、スクリプトからなにかできるようになればいいな、と思いました。 で、モジュールを探したら「AnyEvent::IRC」を発見しました。 ということで、投稿された英語コメントを日本語に翻訳して表示するスクリプトを書いてみました。 use strict; use warnings; use AnyEvent; use AnyEvent::IRC; use AnyEvent::IRC::Connection; use AnyEvent::IRC::Client; use JSON; use Encode; use LWP::Simple; use URI::Escape; my $irc_server = 'irc.freenode.net'; my $chan = shift @ARGV or die "Usage: $0 #chan"; my $c = Any
http://d.hatena.ne.jp/memememomo/20100416/1271371693 irc_privmsg => sub { my ( $self, $msg ) = @_; my $comment = $msg->{params}->[-1]; my $trans_url = 'http://ajax.googleapis.com/ajax/services/language/translate?v=1.0&q=' . uri_escape($comment).'&langpair=en%7Cja'; my $json = LWP::Simple::get($trans_url); my $result = from_json($json); print "\n" . Encode::encode('utf8',$result->{responseData}->{t
ただ作ってみたくなったので実装してみました。発言されたURLのタイトルとContent-Typeを返すボットです。 GitHub - punytan/mobijiro: IRC bot 名前はアレを真似てつけました。 レスポンスの文字コード AnyEvent::HTTP::http_get で取得すると、 UTF-8 だったり、 EUC-JP であったりと、 body の文字コードが何か検討がつかない。 なので、 HTTP::Message の decoded_content を使うことでそのあたりの処理を楽にしています。 その役割を担うのが Tatsumaki::HTTPClient で、説明はこちら(Tatsumaki::HTTPClientというモジュールの紹介 - punitan (a.k.a. punytan) のメモ)を参照ください。 ソース use strict; use w
バグ修正です． タイトル内に改行があって，かつ\r が含まれる場合タイトルがうまく出なかったのを修正． ユーザエージェント名の文字列内に"libwww-perl" があると403 を返してくるサイトがあるのでユーザエージェント名変更．> 2ch/livedoor/gigazine とか <matoken> http://hato.2ch.net/ebooks/ -zerra_xyz-P/#koedolug:*.jp- ようこそボボンハウスへ <matoken> http://books.livedoor.com/ -zerra_xyz-P/#koedolug:*.jp- 403 Forbidden <matoken> http://gigazine.net/index.php?/news/comments/20101001_pancake_royalhost/ なんだろう．後でデバッグいれ
IRCでbot動かすために使えるモジュールをざっと調べてみたところ、Net::IRC, Bot::BasicBot, POE::Component::IRC, AnyEvent::IRC::Clientあたりが使えそう。 時代はAnyEventってことで、AnyEvent::IRC::Clientを使ってnickname++したら、その数を覚えておいてIRCにPOSTしてくれるスクリプトを書いてみました（++, --の機能はKarmaっていうらしい） use AnyEvent; use AnyEvent::IRC::Client; my %karma; my $cv = AnyEvent->condvar; my $irc = AnyEvent::IRC::Client->new; $irc->reg_cb( connect => sub { my ($irc, $err) = @_; i
2010年09月01日03:00 カテゴリLightweight Languages perl - 勝手に添削 - Webサイト死活管理 やはり必要以上にゆるいと感じたので。 PerlスクリプトでWebサイト死活管理 - ゆーすけべー日記 リダイレクトはエラー扱いに 以下、問題と感じたところ。 $ua->is_success は300番台でも成立する LWP に限らず User Agent のほとんどはデフォルトではリダイレクト先まで見に行ってしまう このままだと以下のような場合もOKになってしまう。 % lwp-request -S -mHEAD http://www.dan.co.jp/~dankogai/hijitsuzai HEAD http://www.dan.co.jp/~dankogai/hijitsuzai --> 302 Found HEAD http://blog.li
2010年08月12日09:45 カテゴリLightweight Languages perl - AnyEventで超速分散ダウンローダー これ見てたらついムラムラと。 Perl 非同期プログラミング 初出2010.08.11; 08.12 追記time perl mirrorget.pl cpan.yml http://www.cpan.org/src/perl-5.12.1.tar.bz2 # Stage 0: checking headers Elapsed: 0.358819961547852 sec. Last-Modified: Sun, 16 May 2010 22:40:16 GMT Content-Length: 12296076 URLs: http://ftp.ring.gr.jp/pub/lang/perl/CPAN/src/perl-5.12.1.tar.bz2
ブリュッセルで開催された学会に参加するも、帰国の日に宿の浴室に閉じ込められ、しかもアイスランドで火山が噴火。結局、2週間近くヨーロッパ各地を放浪してきました。
自宅のトイレに一週間以上閉じこめられ救出された女性。救出されるまでこのような格好で眠っていたという＝８日、東京都内（寺河内美奈撮影） 病床で「娘が来ない。連絡してほしい」 東京都港区のマンションで先月、９７歳の母親と２人暮らしだった女性（６３）が８日間にわたり自宅トイレに閉じこめられた。女性が見舞いに来なくなったことを心配した入院中の母親が、看護師に安否確認を依頼。女性は救助されたが、母親はその日に永眠した。「母は、寿命を早めることで私を助けてくれたのだと思う」。女性は自らの身に起きた出来事をそう振り返った。 女性によると、母親が間質性肺炎で自宅近くの東京慈恵医大病院に入院したのは１０月初旬。６月に会社を退職した女性は、毎日病院で母親の身の回りの世話をしていた。１１月４日午前１時ごろ、女性が就寝前に自宅トイレに入ってドアを閉めたところ、突然「バタン」と大きな音がした。驚いてドアを開けようと
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
