#!shebang.jp : Eye-Fi から S3 にアップロード
January 04, 200919:20 Eye-Fi から S3 にアップロード カテゴリ技術ネタ ブログネタ：Webアプリケーション に参加中！ 昨年末に発売された Eye-Fi Share の日本語版ですが、これまで個人的なバックアップ用途に利用していた Amazon S3 が使えないようだったので Gallery の Protocol を受けとって S3 にアップロードする Proxy 的なアプリを書いて対応してみました。 http://coderepos.org/share/browser/lang/perl/GR2S3/trunk http://svn.coderepos.org/share/lang/perl/GR2S3/trunk/ ソースは CodeRepos に入れておきました。Catalyst 使ってます。 Catalyst 以外に Catalyst::Plugin
ゆーすけべー日記: 日本のAV女優一覧を取得するPerlモジュール「Acme::JapaneseAvActress」をCodeReposに
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
wakaponさんの超☆Perl備忘帳: PerlOSのブートプロセス
現在までに進行中のPerlOSのめもめも．とりあえずブートプロセスとその後のPerlドライバロードのめも． ブート時の構成は以下のとおり． ・画面出力ドライバ (C言語) ・割込みハンドラ (C言語) ・キーボードドライバ (C言語) ・フロッピードライバ (C言語) ・ファイルシステム (C言語; FatFSを使っている; Perl版read-onlyで作成済み) ・MULTIPLICITYマクロを有効にしたmicroperl (C言語; perl-5.8.8) ・microperlが動作するためのlibc (C言語; 古いnewlib) ・いくつかのPerlスクリプト (Perl) Perl処理系にはmicroperlを用いる．インタプリタインスタンスを複数で独立させたいので，MULTIPLICITYマクロを有効にしてコンパイルする． いくつかのPerlスクリプト，が次にシステムを制御
tokuhirom blog
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
MapReduce - naoyaのはてなダイアリー
"MapReduce" は Google のバックエンドで利用されている並列計算システムです。検索エンジンのインデックス作成をはじめとする、大規模な入力データに対するバッチ処理を想定して作られたシステムです。 MapReduce の面白いところは、map() と reduce() という二つの関数の組み合わせを定義するだけで、大規模データに対する様々な計算問題を解決することができる点です。 MapReduce の計算モデル map() にはその計算問題のデータとしての key-value ペアが次々に渡ってきます。map() では key-value 値のペアを異なる複数の key-value ペアに変換します。reduce() には、map() で作った key-value ペアを同一の key で束ねたものが順番に渡ってきます。その key-values ペアを任意の形式に変換すること
tokuhirom blog
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
名義尺度間の連関係数を算出するperlモジュール - ダウンロードたけし（寅年）の日記
データマイニングを行う際に、適当な２つの変数にどれだけの相関関係があるのか確かめたくなったとします。 それらのデータはいわゆる「名義尺度」なデータ（地域別の野球チームの好き嫌いなど）だとしましょう。 名義尺度なデータ間における連関係数と言えば「クラメール係数」。 これをぱっと算出してくれるモジュールが欲しくなったので書いてみました。 Statistics::Associations - Calculates Association Coefficients of Nominal Scale. http://search.cpan.org/~miki/Statistics-Associations/ 使い方はこう。 use strict; use Statistics::Associations; my $asso = Statistics::Associations->new; my $m
日本語処理・携帯絵文字処理関係のperlモジュール
Kawa.netxp 日本語処理・携帯絵文字処理関係のPerlモジュール 日本語を含む多言語処理(主にUTF8、Shift_JIS、ISO-2022-JP。 その他にLatin1、EUC-JP、EUC-KR、Big5、GB2310などにも対応)や、 DoCoMo・SoftBank・au に対応した携帯絵文字処理関連のモジュール群です。 CGIparamJP.pm - CGI.pmのクエリ中の日本語処理 EmailHTML.pm - HTMLメールMIMEマルチパートメッセージの生成 EmailJP.pm - 携帯絵文字対応のSMTPメール送信 EmojiTrans.pm - iモード用絵文字をSoftBank/au用絵文字に変換 Encode561.pm - Perl 5.005/5.6.1 環境で Encode.pm ライクな操作 EntityRef.pm - © 等の実体参照
tokuhirom blog
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
tokuhirom blog
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
Lingua::LanguageGuesser - 言語判定器
名称 概略 詳細 メソッド サポートしている言語(not utf8 mode) サポートしている言語(utf8 mode) EXPORTするメソッドについて 参照 著者 COPYRIGHT AND LICENSE 名称 Lingua::LanguageGuesser - 言語判定器 概略 use Lingua::LanguageGuesser; $textstring = 'text strings'; @lang_list_sorted_similarity = Lingua::LanguageGuesser ->guess($textstring) ->eliminate() ->suspect('english', 'japanese-euc_jp') ->result_list(); print "Input is perhaps $lang_list_sorted_similar
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
関西オープンソース 2008 30days Albumの裏側