タグ

perlに関するamachangのブックマーク (45)

  • 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

    amachang
    amachang 2009/03/25
    new を上書きする手法。コンストラクタジャッキング、 Bless Jacking
  • 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

    amachang
    amachang 2008/11/13
    $fooほげ 問題/よくやるので、気をつけます。
  • Radar - O’Reilly

    Radar - O’Reilly
    amachang
    amachang 2008/07/23
    キタキタキター!
  • perl-mongers.org

    This domain may be for sale!

    amachang
    amachang 2008/06/01
    おおお。いいねー!すばらしい
  • 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

    amachang
    amachang 2008/05/21
    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

    amachang
    amachang 2008/05/21
    CPAN ソムリエ「このモジュールは貴婦人の胸元に輝く真珠のように美しい」/ Perl だけに真珠
  • Perl-users.jp - 日本のPerlユーザのためのハブサイト

    Perl Mongers Perl Mongers とは、日各地に存在する、Perl ユーザーのコミュニティのことです。各種イベントが行われていますので、是非参加してみましょう。 Shibuya.pm Fukuoka.pm Kansai.pm (@kansaipm) Yokohama.pm (@yokohamapm) Hokkaido.pm (@hokkaidopm) Nagoya.pm (@nagoyapm) Kushiro.pm (@kushiropm) Kyoto.pm (@kyotopm) Kamakura.pm Niigata.pm (@niigatapm) Sendai.pm (@sendaipm) Tokyo.pm Hachioji.pm (@hachiojipm) Chiba.pm (@chibapm) Yomitan.pm (@yomitanpm) Machida.pm

    amachang
    amachang 2008/05/20
    いいですねー!
  • 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

    amachang
    amachang 2008/05/19
    すてきエントリー
  • 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

    amachang
    amachang 2008/05/01
    Devel::Caller キタコレ!
  • みんな Perl やろうよ! - IT戦記に同意。 - hogelogの日記

    perlやる人の悪い癖として、perlやらない人の「perlはわけわからん」とかの発言に対して「HTTPサーバできたよー」 use IO::Socket;$SIG{CHLD}=sub{wait};for($s=new IO::Socket::INET( LocalPort,9999,Listen,5,Reuse,1);$c=$s->accept;){if(!($p=fork)){while( <$c>){if(/GET \/(\S+\.(\S+))/){open F,$1;read F,$d,-s$1;print$c "HTTP/1.0 200 OK\nContent-Type: ",$2=="html"?"text":"image","/$2\n\n"; print$c $d}}}} とか言って悪ふざけすることがあげられると思います。悪ふざけだとわかっていただければよいのですが。 とにか

    みんな Perl やろうよ! - IT戦記に同意。 - hogelogの日記
    amachang
    amachang 2008/04/24
    HTTP サーバすげー! hogelog++
  • Perl逆引き辞典 - サンプルコードによる Perl 入門

    Perl › here Perlの逆引き辞典です。発展的な話題もこちら。 特徴を解説 バージョン情報 データベース プログラムの自動試験 ソケット プロセス間通信 ワンライナー 統計・解析 XS入門 言語実装の研究 豆知識 モジュール基礎 オブジェクト指向 日付・時刻 文字コード ビット演算子 Perl › here

    Perl逆引き辞典 - サンプルコードによる Perl 入門
  • ゆーすけべー日記

    サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ

    ゆーすけべー日記
    amachang
    amachang 2008/04/14
    略しちゃだめ><
  • Perl で utf8 化けしたときにどうしたらいいか - TokuLog 改メ tokuhirom’s 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

    amachang
    amachang 2008/04/08
    全然理解してなくて、いつも場当タリティ溢れる解決をしていたよ。ごめんなさい。
  • CodeRepos::Share – Trac

    Catalyst Conference #1 Catalyst (Perl, Cisco, ATI) ユーザーが集まってうだうだする会 既にキャパオーバーなので締切ました!!''' 日時 nothingmuch(http://search.cpan.org/~nuffin/)が来日するので4/22(火)で確定。 開場 19:00 開始 19:30 場所 サイボウズ・ラボ (サイボウズ・ラバは悪質なフィッシングサイトなのでお間違いないようお願い致します) 2次会会場 赤坂 蘭苑飯店 21:00スタート 23名で予約済み 内容 メディア(LANケーブル)を量産する(これは内容の例です) 司会 Committer:typesterさん、おながいします タイムキーパー id:tmaesaka 基調講演 id:dann のCatalystとMVC論 (15min) id:ikasam_a によるCa

  • Client Challenge

    A required part of this site couldn’t load. This may be due to a browser extension, network issues, or browser settings. Please check your connection, disable any ad blockers, or try using a different browser.

    amachang
    amachang 2008/02/25
    perl で jQuery ライクなメソッドチェーンを使う。これはすごい! jQuery に慣れているので、今度からサーバサイドでスクレイピングするときはこれを使ってみよう
  • 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

    amachang
    amachang 2008/02/05
    なんじゃこりゃー。Perl 5.10 から state っていう宣言ができるらしい>< my local our state !
  • グニャラは大変なPerlをDISっていきました

    冗談ですよ、冗談。●オリジナル : http://d.hatena.ne.jp/tasukuchan/20080127/flash_javascript_perl●オリジナルのオリジナル : http://shatyou.hp.infoseek.co.jp/toho2.html

    グニャラは大変なPerlをDISっていきました
    amachang
    amachang 2008/01/28
    だらだらだらだらだらだらだらあっとぱーあっとぱーあすたりすくぅw 笑ったw
  • FrontPage - Perl/CPAN 入門wiki

    Perl/CPAN 入門Wiki目的Perl布教 CPAN活用のすすめ CPANモジュールのすごさCPANモジュールがつかえればPerlは何でもできます。 iPodをいじることも、OpenGLで3Dを表示することも、GUIアプリを作ることもできます。PHPなんて目じゃありません。 でも慣れないとCPANは分かりづらい。どうやって使えばいいのかも、どのモジュールを使えばいいのかも分からない。そのようなCPAN初心者のハードルを無くすのが目的です。 Perl自体の説明も大歓迎です。 コンテンツ説明 トップ いまここ CPANの使い方 ActivePerlのPPMもここ おすすめCPANモジュール一覧 おすすめのモジュール一覧。説明とか使い方とか 逆引きCPANモジュール やりたいことからモジュールを探す お願い新規参入が無くなったらコミュニティは終わりだと思います。 (少なくとも日の)Pe

    amachang
    amachang 2008/01/21
    おおお。こういうので CPAN (すぃーぱん) の勉強しよう><
  • [Perl] my と local と our の違いについて - 竹迫の近況報告

    404 Blog Not Found:perl - myとourとscopeと みんな難しく考えすぎです。 (例外については後で考えることにして)とりあえず以下の基をおさえておけば混乱することはないと思います。 ■ our 宣言について our はグローバル変数をスマートに使用するための宣言です。our は use vars と等価と考えてください。 our $var; は use vars qw($var); と等価。 our $var = 1; は use vars qw($var); $var = 1; と同じ動きをするもの、と覚えておけばOKです。それ以上の違いは基的にないと考えて構いません。 ひとつ実用上の違いがあるとすれば、our は Perl 5.6 以降の built-in なのに対して、use vars は vars.pmPerlスクリプトで実装されています。し

    [Perl] my と local と our の違いについて - 竹迫の近況報告
    amachang
    amachang 2008/01/10
    Perl 界のボブw local の等価式がわかりやすいです><!
  • perl - myとourとscopeと : 404 Blog Not Found

    2008年01月10日10:15 カテゴリLightweight Languages perl - myとourとscopeと うーん、微妙に違います。 local と my - IT戦記 our 名前をソース上のスコープに限定. local 値をスタック上のスコープに限定. my 名前と値の両方をソース上のスコープに限定 なら、理解しやすいと思います>< 以下のコードを見てみましょう。何と表示されるでしょうか。 { package Foo; our $bar = 'baz'; } our $bar = 'drink'; warn $bar; warn $Foo::bar; 「ソースに限定する」あるいは「ファイルに限定する」のだとしたら、この挙動はありえないはずです。 ここで、Perlのスコープに関するルールを覚えておきましょう。すっごく簡単です。 {}は、問答無用でスコープを作る = b

    perl - myとourとscopeと : 404 Blog Not Found