タグ

ブックマーク / digit.que.ne.jp (3)

  • Moose - Perl5のためのまったく現代的なオブジェクトシステム

    NAME SYNOPSIS CAVEAT DESCRIPTION 別のオブジェクトシステム!?!? これを製品に使えますか?それとも実験段階でしかありませんか? MooseはPerl 5におけるPerl 6に過ぎませんか? BUILDING CLASSES WITH MOOSE EXPORTED FUNCTIONS UNEXPORTING FUNCTIONS unimport MISC. What does Moose stand for?? CAVEATS ACKNOWLEDGEMENTS SEE ALSO BUGS AUTHOR COPYRIGHT AND LICENSE Page Top NAME Moose - Perl5のためのまったく現代的なオブジェクトシステム Page Top SYNOPSIS package Point; use strict; use warnings;

  • Perlメモ/正規表現のコンパイル - Walrus, Digit.

    検索文字列で、ワイルドカードとして"*"を使用できるという記法をよく見かけます。 以下のサブルーチンは、この記法で指定された、1つあるいは複数のマッチング文字列に相当する正規表現を返します。 sub make_wildcard_regex { my @keys = @_; return undef unless (@keys); my $pattern = join('|', map { s/([^\*]+|\*)/$1 eq '*' ? '.*' : "\Q$1\E"/ge; $_; } @keys); return qr/$pattern/; } 以下はこのサブルーチンを使用するサンプルです。 my @urls = ( 'http://digit.que.ne.jp/', 'http://digit.que.ne.jp/index.htm', 'http://digit.que.ne.

  • Perlメモ/Data::Dumperモジュール - Walrus, Digit.

    出力を見やすくするために、頻繁に使用しているオプション。 見映えを気にする必要がある時には、試してみると良いかもしれません。 Indent インデントを0(なし)、1(固定幅)、2(自動可変幅)、...で指定できる。デフォルトが2だが、1が見やすい気が。またファイル出力であれば0でも良い。 Terse 変数名の出力を0(省略しない)、1(可能であれば省略)で指定できる。デフォルトが0でこちらの方がevalでは確実に扱えるが、表示だけのためであれば1が見やすい。 Sortkeys キー項目のソートを0(ソートしない)、1(ソートする)で指定できる。デフォルトは0だが、1の方がずっと目当てのキー項目を探しやすい。 使用時には、通常は以下のようにクラス変数で指定します。 local $Data::Dumper::Indent = 1; print Dumper(@_); OOスタイルであれば、次

  • 1