Shibuya Perl Mongers : Shibuya Perl Mongersテクニカルトーク#16
Shibuya Perl Mongersテクニカルトーク#16 を2011年7月6日(水)にmixiさんの新オフィスをお借りして開催します。 今回はmixiさんのご厚意によりテクニカルトーク後に懇親会を開催する予定となっております。 こちらも時間の許す限り奮ってご参加いただければと思います。 テーマ - 「夏の正規表現祭り」 日時 - 2011年7月6日(水) 18:45-21:00 (18:30 開場) 会場 - 〒150-0011 東京都渋谷区東1-2-20 住友不動産渋谷ファーストタワー 7F (株式会社ミクシィ) 料金 - 無料 定員 - 110名 (いちばん大きなセミナールーム) 事前登録 - http://atnd.org/events/17082 にて参加申し込みが必要 → 満員御礼 中継 - http://www.ustream.tv/channel/shibuya-per
正規表現でマッチした部分のキャプチャ ($1,$2とか) について勘違いをしていた - @kyanny's blog
今後また間違えそうなので丁寧めにメモ。 追記 コメント欄でせいきひょうげんの先読みという機能について教えてもらった。まだ理解できてないけど、たぶんそれを使えばスマートに解決できるのだと思う。あと、例としてかいた式が間違っていたので修正した。 - my ($a, $b) = "/b/x/2" =~ m{^(?:/(a)/x/(1))|(?:/(b)/x/(2))}; のようなコードを書いて、 $a も $b も undef になるのでしばらく悩んでいたけど、この書き方だと問題があった。 以下のようなコードを書いてみたら、意味がわかった。 #!/usr/bin/perl use strict; use Data::Dumper; my $a = q{/a/x/1}; my $b = q{/b/x/2}; my $c = q{/c/x/3}; for my $x ($a, $b, $c) { i
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
正規表現からその正規表現にマッチするような例を生成する - Whitebell::HatenaBlog
via. 正規表現からその正規表現にマッチするような例を生成する - www.textfile.org Perlでもたしかそんな感じのことやってくれるモジュールがあったよねー、と思ってちょっと探してみたらやっぱりもうあったり。 pcreフルスペックじゃないけど、実用上はこれだけあればわりと使えるよね。 String-Random-0.22 - Perl module to generate random strings based on a pattern - metacpan.org 関係のない追記 じつはこのモジュール、こういうことやってくれるモジュールがあるってことは知ってたんだけど、ブックマークしてなくて、探すのにちょっと手間取るというちょっとしたお話があったりして。たぶん前にどこかのblogで見て、まず自分のはてブをチェックして見つからないので、http://kobesearch
正規表現の否定 #2 - odz buffer
ref:Unknown::Programming - 文字列の先頭がある単語で始まらない正規表現って ref:odz buffer - 正規表現の否定 ちょいと考えてみたんだけど、任意の正規表現にマッチしない正規表現ってのはこうすれば作れるんではないだろうか。 sub negative_regexp { my ($re) = @_; return qr/\A(?!$re)(?:.(?!$re))*\Z/s; } 適当にモジュール化して適当にテストを書いてみたけどどうだろう。まぁ、テストが全然足りないんだけども。 とりあえず、dankogai さんあたりがツッコミを入れてくれると期待。いや、実は全然既知のネタというオチがありそうだけども。 package Regexp::Negative; use warnings; use strict; use Carp; use version; ou
regexp - (?=lookahead) and (?<=lookbehind) assertions : 404 Blog Not Found
2007年05月01日01:45 カテゴリLightweight Languages regexp - (?=lookahead) and (?<=lookbehind) assertions Mastering Regular Expression Jeffrey Friedl [邦訳: 詳説 正規表現] つっこみの方はちょっと後回しにして... odz buffer - 正規表現の否定 #2 とりあえず、dankogai さんあたりがツッコミを入れてくれると期待。 まずはこちらから。 Unknown::Programming - 文字列の先頭がある単語で始まらない正規表現って qr/^(?:(?!foo).)+.*/ でいいのかなぁ・・・？ LookbehindLookahead Positive(?<=expression)(?=expression) Negative(?<!exp
それ Regexp::Assemble - odz buffer
ref:ここギコ！: 安易なループは慎むべきですね ref:jnaoyaのはてな日記 - 添削その2 ref:404 Blog Not Found:perl - 勝手に添削^2 - loop control ん？ループ云々を抜きにして、こういうのは Regexp::Assemble の出番じゃないの？添削だから？それともパフォーマンスとか？ use Regexp::Assemble; my %analyze = ( qr/Pattern 1/ => 'Pattern 1', qr/Pattern 2/ => 'Pattern 2', qr/Pattern 3/ => 'Pattern 3', ); my $re = Regexp::Assemble->new; $re->track->add(keys %analyze); while (my $log = $logs->readline)
二度目の公開！電話番号の正規表現 : にぽたん研究所
※ 二度目の公開というタイトルにしましたが、三度目は予定していません。 2 年ぐらい前に、本邦初公開！電話番号の正規表現というネタで、Regexp::Assemble という CPAN モジュールを紹介したことがありました。 あのモジュールを使うことによって、日本で初めて、電話番号を正規表現で表わすという試みをしてみたのですが、該当エントリに書いた通り、 Number::Phone::JP の正規表現が今日現在でも正しいのかどうか等、未検証部分が異常に多いので、自己責任でお使いくださいｗ というものでした。 その後、Number::Phone::JP モジュール自体も、更新が面倒臭そうなものなせいか、全然更新されていなかったのですが、何やら今日更新版が出ている模様。 どうも作り直したっぽいかんじ。 で、早速ですが、最新版の正規表現テーブルを用いて、最新版の電話番号にマッチする正規表現を作っ
テスト駆動で 0 から 255 の数字にマッチする正規表現へ変形してみる - Tociyuki::Diary
ぶくま経由で、RFC 3986 URI の日本語訳にたどり着き、読んでいました。スムーズな日本語ですんなりと読めて、良い訳だと思いました。私は誤訳を見つけられませんでした。 それはともかく、読んでいる最中に、RFC3986 だけではないのですが、IPv4 アドレスの数字にマッチする構文が、正規表現向けでないのに改めて気になりました。RFC の記述をそのまま正規表現にすると、バックトラックをおこす書き方になっています。 バックトラックがおきないようにするには、先頭から1文字ずつ見ていくだけで残りの選択肢のどれに進めばいいか決定できるようにすればよろしい。ということで、これをテスト駆動で正規表現に向いた記述に変更してみました。 ⇒ http://www.studyinghttp.net/cgi-bin/rfc.cgi?3986#Sec3.2.2 IPv4address = dec-octet
TAKESAKO @ Yet another Cybozu Labs: Perl6正規表現リファレンス（Software Design 2007年2月号）
今日1/18発売のSoftware Design 2007年2月号にて、巻末特別企画「先取り Perl6正規表現カタログ ～ Perl5からの変更点を徹底解説！」を書かせていただきました。 記事については、難易度の設定が非常に難しかったのですが、Perl5から変更のあった記法を中心にピックアップし、 Perl6の一つの実装である最新のPugsで動作するサンプルを中心に正規表現の書き方を解説しました。 なので、Perl6の元々の仕様とは若干異なっている部分がありますし、正しくない部分もあるかと思います。 間違いがあればブログで指摘していただけると嬉しいです。 巻末特集は、毎回デスクトップリファレンスとして使えることを目指して書いていますので、 Software Design巻末リファレンスの正しい読み方 を参考に、冊子を作ってみてはいかがでしょうか。 他にも、柴田さんの「速報！Python
{perl,ruby} -nle 'print if /start/../end/' : 404 Blog Not Found
2006年12月22日19:00 カテゴリLightweight Languages {perl,ruby} -nle 'print if /start/../end/' アルファギークでも知らなかったというのは、不思議でもあり当然のようでもあり。 naoyaグループ - naoyaの日記 - if /regexp/../regexp/ Perl で正規表現を .. すると、その間に含まれる文字列という意味でマッチさせられる。 % w3m -dump_source http://www.yahoo.com/ | perl -nle 'print if /^<style/../<\/style>/' とするとこれ、実に由緒正しい使い方で、たしかまだperlがhashすらサポートしていない頃からあったと記憶しています。なにしろsed/awkが起源ですから。 NAME operator - se
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
HTML-Selector-XPath-0.02 の疑問個所 - Tociyuki::Diary
miyagawa さん作の HTML-Selector-XPath-0.02 は便利ですね。 (10月8日) 以下取消 以下の疑問点は、CSS3 のセレクタ・ドラフト案 (http://www.w3.org/TR/css3-selectors/#typenmsp)の xmlns の先取り実装でした。CSS2.1 で考えていたので、理解できなかったということがわかりました。お騒がせして申し訳ありませんでした m(_ _)m なのですが、ソースを見ていたら、element の正規表現が、なぜこうなるのか理解できませんでした。 ⇒ HTML::Selector::XPath element => qr/^([#.]?)([a-z0-9\\*_-]*)((\|)([a-z0-9\\*_-]*))?/i, # 途中略 if ($rule =~ s/$reg->{element}//) { # 途中略
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
正規表現でパイプを使うと遅くなる件 - Unknown::Programming
http://qootas.org/blog/archives/2006/06/perl_regex_perf.html 正規表現でパイプ("|")を使うとめちゃくちゃ遅くなるってことだけどこれって程度によるみたいね。 「コレかコレかコレにマッチする」みたいな正規表現を書くときにパイプ使うのがダメであって、ちょっとでも複雑な正規表現になるとパイプ使っても使わなくても大差無いっぽい。 ってか試してみたらむしろ遅くなった。 # コードは元記事のやつを拝借させてもらいました。 use Benchmark; my $text = ';lskjdf;klvckxv;zijxcv;oa;vlkaefiuqewizlkvnzlxkcnv' . '.z,xmc v/z.x,cmv.z,xnvlafda isjdnfl aksjdfauerfaie' . 'jnlfakjdsn;akj;v akjdfvoa
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Perl の Regexp::List で capture => 1 が効かない件 - miau's blog?
https://labs.cybozu.co.jp/blog/kazuho/archives/2007/07/perl_ndes_regex.php
404 Blog Not Found:正規表現を//で囲む理由
http://tdiary.ishinao.net/20070309.html
D-5 出張版 - [開発] 正規表現で/o