タグ

Perlとglobに関するkazuph1986のブックマーク (2)

  • 型グロブを理解する 〜アスタリスクは怖くないよ(。・ω・)ノシ〜 - (゚∀゚)o彡 sasata299's blog

    2009年03月28日16:01 Perl 型グロブを理解する 〜アスタリスクは怖くないよ(。・ω・)ノシ〜 先日、tokuhiromさんの LWP::UserAgent::WithCache::Transparent を見ていて、 my $orignew = *LWP::UserAgent::new{CODE}; {CODE}って何だ!?と思ったので調べてみました。結論から言うと、これは型グロブです。まずは型グロブの簡単な説明から。 そもそもperlでは、(グローバルな)変数とか配列とかハッシュとかサブルーチンとかファイルハンドルなんかは全て一つのテーブル(シンボルテーブル)で管理されています。 ※レキシカル変数(my宣言する変数)はシンボルテーブルではなく、別テーブルで管理されています。 例えば、 #!/usr/bin/perl use strict; use warnings; ou

  • Shipped File::Zglob 0.01 - tokuhirom's blog

    http://github.com/tokuhirom/File-Zglob File::Find::Rule とかまあ結構なんですけども、 File::Find::Rule->file->in('lib')->name('*.pm')っていうフォームはなかなかぱっと思いだしづらいです。ユーザーフレンドリーじゃないんですね。 シェルだったら lib/**/*.pm ってうったらいっぱつででてくるじゃないですか。そういう風にうちたいですよ。 というわけでつくってみました。 File::Zglob です。 use File::Zglob; my @files = zglob("lib/**/*.pm");という風にうつだけでいいんです。このインターフェースならわすれないでしょう。shell で普段からうってますものね。 ちょっとしたスクリプトとかで超便利だとおもうので、ぜひつかってみてください

  • 1