例えば、 my $str = 'はてなアンテナ、はてなブックマーク、はてなカウンター、はてなダイアリー';とあったとき、その中の『はてな』の個数を数えたい。 私だと、ぱっと思いつくのは次のコードである。 my $count = $str =~ s!はてな!はてな!g;ちなみに$strを破壊しても良い。 ふと、どういうのが普通なのか気になった。そう大した問題ではないのだけれど。
段々、内容が難しくなってきました。昨日は8章の「正規表現の詳細」を勉強しました。 イデオム 今まで正規表現はgrepやviでごく簡単な正規表現しか使ったことがなかったので、この章は勉強になりました。 そこで、新しく覚えたイデオムを1つ紹介。以下の正規表現は、改行文字も含めてあらゆる文字にマッチさせたい場合によく使われる書き方なのだそうです。へぇ〜。正規表現も、どの言語でも同じように、イデオムをできる限り蓄積して、それを適切な場面で使えるかどうかがポイントですね。 [\d\D] 私のgrep術 私が普段よく使う正規表現は、本当にシンプルです。例えばPHPで書かれたsetURL()という関数の定義を調べたいと思ったら、以下のようにgrepします。大抵の場合、これで十分です。メタキャラクターは使いません。 $ grep -rn "function setURL(" . ./libs/BLOG.p
人力検索でPerlの開発環境はどんな感じ?という質問があがっていて、にわかに盛り上がって(?)いますね。僕も回答してみました。 一般的にPerl使ってる人はWindowsで開発する人が多いんですかね?サーバにログインして、ターミナル上で開発をする人って結構少ないのかなぁ。 自分なんかローカルで一応Active Perlをインストールしているけど、ほとんど使わないし…。普段はサーバにログインしてそこでemacsで開発、ローカルでやるとしたらcolinuxにログインしてそこで開発って感じです。Windows上にソースを置くということはしてませんねぇ(あ、colinuxはWindows上か…) その感想として Emacs とか vi 使わないの? っていう話。mixi なんかを見てても僕の周辺で同じ感想を持ったひとが多かったようで。 やっぱり Perl は PC-UNIX を含む UNIX との
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く