タグ

perlに関するhogelogのブックマーク (18)

  • Perl で Win32::API プログラミング入門 - 竹迫の近況報告

    ActivePerl (Windows版) には Win32::API - Perl Win32 API Import Facility - metacpan.org が付属しているので、今日からすぐに Win32::API を利用したプログラミングが出来ます。 簡単なメッセージボックスを表示するPerlプログラムは以下になります。 #!/usr/bin/perl use Win32::API; my $MessageBox = Win32::API->new("user32", "MessageBoxA", "NPPN", "N"); $MessageBox->Call(0, "Hello, World!\n", "Message", 0); このプログラム実行すると、「Hello, World!」と書かれたWindowsメッセージボックスが表示されます。 これを Win32::API

    Perl で Win32::API プログラミング入門 - 竹迫の近況報告
  • 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 - 勝手に添削 - Storable : 404 Blog Not Found

    2006年05月11日13:45 カテゴリLightweight Languages perl - 勝手に添削 - Storable というわけで、ひさかたぶりの勝手に添削のコーナーです。今回は、Storableに関して。 [を] Perl の Storable モジュールのメモ store [ $first->{uhyo}, $first->{hogera} ], "a.dat"; codingそのものに問題はありませんが、damianにも載っていないbest practiceをここで一つ紹介しましょう。 Always use nstore and nfreeze instead of store and freeze. 常にnstoreとnfreezeを使う事。storeとfreezeではなく。 理由は、その方がずっとつぶしが利くからです。頭にnをつけるだけで、platform依存が

    perl - 勝手に添削 - Storable : 404 Blog Not Found
  • MODULE.JP - 日本語に絡むUnicodeブロックとスクリプト(正規表現)

    といった感じ。ちなみにjava.util.regexとPerlのUnicodeブロックは接頭子Inを使うが、.NETの場合は接頭子Isを使う、という差異があります。 Unicodeスクリプトとブロックの違いがビミョーに見えるけど、ブロックがコードブロックをゴリッと指定したものに対して、スクリプトは特定言語に関係する文字の種類を直接指定するものなのでブロックよりも断定的、って感じで見れば良かなと。ちなみにUnicode関連のドキュメントによるとUnicodeプロパティとスクリプトで日語の文章を表そうとすると m/(?:(?:\p{Hiragana}|\p{Katakana}|\p{Han}|\p{Latin}|\p{Common}) (?:\p{Inherited}|\p{Me}|\p{Mn})?)+/x; こんな感じになるそうな。実際流通している文章はこれより多様なので現実とは微妙に乖離

    hogelog
    hogelog 2006/12/30
  • mizzy.org : perlで人工無脳 #0

    perlで人工無脳 #0 Posted by Gosuke Miyashita Sat, 18 Jun 2005 14:42:35 GMT ちょっと興味と必要があって、人工無脳に手を出してみることになりました。まあ、人工無脳なんて今更って気もしますが、とりあえずやってみたことはどんなにしょぼくても公開する、というポリシーですので、恋するプログラム―Rubyでつくる人工無脳を参考にしながら、perlで実装していく過程をここに載せていきたいと思います。 といっても、このの流れに沿っていくわけではなく、俺の思いつきのままにやっていきますので、そこんとこよろしくです。 で、今回は人工無脳のパターン辞書を、何らかのデータから自動生成することを考えてみます。 パターン辞書というのは、人工無脳への問いかけの中に、「A」という言葉がある場合に、「B」という応答を返す、というパターンが記述された辞書です。

  • Perl の数値変換

    Last Updated: 2002/03/26 Perl で、16進文字列、10進整数、2進文字列、バイナリー文字列の相互変換を行うための、スクリプトメモです。 特に断っていない限り、Perl 5.001 以上で動作します。 目次 16進文字列からの変換 10進整数からの変換 2進文字列からの変換 バイナリー文字列からの変換 16進文字列→10進整数への変換 hex() 関数は、16進文字列を整数値に、手軽に変換できます。 $num10 = hex("4A"); # $num10 には 74 が入る $num10 = hex("FFFFFF"); # $num10 には 16777215 が入る 余談ですが、数値リテラル中では 0x に続けて 16 進数で記述することで、数値を表すことができます。 $num10 = 0x4A; # 74 $num10 = 0xFFFFFF; # 1677

    hogelog
    hogelog 2006/11/15
    packめも。
  • Perlメモ

    複数のプロセスでロック状態が異常であると判断し,そのうちの 1つがロックを解除したことにより,別のプロセスがロックしたにもか かわらず,先ほどロック状態が異常であると判断したプロセスによってこの正常なロッ クを解除されてしまう可能性があります. この方法の問題点は,異常なロック状態を解除する操作が正常なロック状態をも 解除できてしまうことにあります.逆に言えば,異常なロック状態を解除する操作に よって正常なロック状態を解除できなければ問題ないわけです.そのためにはどうす ればよいのか? 答えはロック状態が常に変化していけば よいということです.そして,これを実現するのに都合がよいのが rename による方法になります. 最初のスクリプトで説明しますと,ロックファイルが lockfile という 名前のときがロックが解除されている状態で,lockfile987654321 のよう に後ろに

    Perlメモ
  • Atsushi's Homepage 〜 Google Web APIs を使ってみる

    Google Web APIs (Google SOAP Search API) の使い方などの説明です。 Google Web APIs (Google SOAP Search API に名称が変更されました) とは Google の検索エンジンを簡単にプログラミング言語から 利用できるようにした Web サービスです。 Web 検索、スペルミス指摘、キャッシュページの取り出しが可能です。 現在 Google Web APIs - Home (改名後は Google SOAP Search API。機能は変わっていません) (英語) でβ版が提供されています。 検索エンジンですが、Google の持つその膨大な情報をうまく利用すれば 何か面白い物が作れるかもしれません。 Google Web APIs (Google SOAP Search API) は SOAP と呼ばれる Web サ

    Atsushi's Homepage 〜 Google Web APIs を使ってみる
  • MFPM:ホーム

    このサイトは、CPANに登録されているモジュールをお気に入りリストとしてコメントをつけて登録したり、他人のお気に入りモジュールの一覧を見たりすることが出来ます。 主な機能 CPANモジュールの検索 コメントをつきのお気に入りリスト モジュールのバージョンアップの検知 モジュールに関する他人のコメント閲覧 他人のお気に入りリスト閲覧 自分のお気に入りリストを自分のBlogに貼り付けられる CPANモジュールに対してトラックバック送信可能 お気に入りに登録しないモジュールに対してメモを残せる del.icio.usなどと同等のタグ機能によるお気に入り整理 タグを指定して、Blogに貼り付けるリストを変更可能 簡易ソースコードビューワー バージョンアップ通知メール モジュール人気ランキング 現在の所、それ以上でもそれ以下でもないですが、将来的には色々拡張するはず。 利用者が出来たときのToD

  • Perl関連 - Walrus, Digit.

    Perl関連のメモの一覧。 基的には日語での解説を(他のサイトなどで)見つけることができず、英文ヘルプを読み解いたり、自分で試してみた内容のメモで、次のような情報が多くなっています。 WindowsPocketPC上でのPerlの問題、疑問点の解決 CGIなどに関するよくある質問への回答 ここにない内容については、PerlLinkの各サイトをあたってみてください。 一般的な問題や疑問への回答は、ほとんどが見つかるでしょう。

    hogelog
    hogelog 2006/11/05
  • Perl&CGI最強講座 [smart]

    indexは、第1引数STRの先頭から第2引数SUBSTRが最初に見つかった位置を返します。 第3引数 POSITIONで検索する位置を指定することもできます。第3引数POSITIONには最初の文字を 0 として指定します。 返却値は 0、もしくは変数$[に設定した値です。SURSTRが見つからなかった場合は -1 を返します。 indexの使い方 $str = "How you always hurt the one you love."; print index($str,'you'); > 4

    Perl&CGI最強講座 [smart]
    hogelog
    hogelog 2006/10/28
    タイトルは間抜けだけど、結構まとまってて良い。
  • http://www.pure.ne.jp/~learner/program/Perl_tips.html

    hogelog
    hogelog 2006/10/27
  • TAKENAKA's Web Page: Perl入門

    ハッシュとはなにか いよいよハッシュです. ハッシュは便利です. ハッシュが使えるようになると,Perl でできることの幅がぐんと広がります. ハッシュを使いこなしてこその Perl です. ハッシュはたくさんのデータをまとめて管理してくれるという点で配列に 似ていますが,何番目の要素かを指定するのではなくて, キーになる文字列(キーワード)を手がかりに要素を指定するデータ構造です. 配列は(スカラー)変数がたくさん順番に並んだデータ構造, ハッシュは,キーになる文字列と,対応する値とのペアが たくさん順不同で並んだデータ構造 です. 例を見るまえに,表記上のルールを説明します. まず,ハッシュ全体の名前は最初に % をつけます (配列のように @ を付けるのではなく). 個々の要素を指定するときは,キーになる文字列を {} で囲んでハッシュ名の うしろにつけます(配列のように [] で囲

    hogelog
    hogelog 2006/10/27
  • http://www.nesugi.net/diary/20050612.html

    hogelog
    hogelog 2006/10/27
  • http://namako.nizah.net/wiki/pukiwiki.php?%5B%5B%BB%EE%BA%EEbot%5D%5D

    hogelog
    hogelog 2006/10/27
    マルコフ連鎖による文章生成モジュールや人工無脳インターフェイス部分モジュールなど。
  • http://namako.nizah.net/wiki/pukiwiki.php?%5B%5Bbots%2FMarkov1.pm%5D%5D

    hogelog
    hogelog 2006/10/27
    単純マルコフ連鎖による文章生成
  • Perl%u30AA%u30D6%u30B8%u30A7%u30AF%u30C8%u6307%u5411%u30D7%u30ED%u30B0%u30E9%u30DF%u30F3%u30B0

    hogelog
    hogelog 2006/10/26
  • (貧乏な人のための)Perl モジュールの作り方。 : torus solutions!

    ぼくがお金がなくてラクダを買えなかった時に、 こんな情報があればいいなぁと思っていた内容をまとめてみます。 なので、出来るだけフリーのドキュメントを見て内容を確認できるようにしたいと思います。 ちなみに、こちらで動作を確認している Perl のバージョンは 5.6.1 なので、 ドキュメントなどもそのバージョンのものをリンクするようにします。 パッケージ、クラス、モジュール 具体的なクラスの作り方やオブジェクト指向プログラミングの方法などは、 「perltoot - トムによるPerlオブジェクト指向チュートリアル」を何度も読めばわかると思います。 っていうか、ぼくもそれしか読んでないんです。 ごめんなさい。 以下は、そこに書いてある方法で書いた Perl モジュールを、 配布できる形にパッケージングするためのやり方です。 h2xs モジュールを作るには、まず h2xs *1 というおま

    hogelog
    hogelog 2006/10/26
  • 1