perlでスクレイピング「HTML解析してデータを取得」 - メメメモモ
HTMLからデータを取ってくることは正規表現でもできます。 しかし、ちょっとでも表記が変わってしまうとうまく動作しなくなってしまいます。 また、正規表現を読み解くのは結構面倒くさいので、保守するのも大変です。 javascriptにはDOMやXPathがあります。 HTML内のデータにアクセスする記述は、正規表現より分かりやすいです。 perlでもモジュールを用いれば、同じようにアクセスできるようになります。 DOM操作を可能にしてくれるモジュールが「HTML::TreeBuilder」です。 下記のような感じで使用します。 #!/usr/bin/env perl use strict; use warnings; use utf8; use Encode; use HTML::TreeBuilder; my $html=<<'HTML'; <html> <head> <title>Tes
Perlでキャッシュファイルを扱ってみた - D-ramu blog
Perlでのキャッシュファイルを扱うメモ。 WebAPIやスクレイピングしたりと、毎回それにアクセスするよりもキャッシュファイルにアクセスするほうが当然パフォーマンスはよくなります。 ということで今回はファイル（ディスク）キャッシュにアクセスする方法を試してみました。 CPANモジュールは、Cache::FileCache です。 Cache::FileCache - search.cpan.org 使い方は、newの際にオプションで、cache_root（保存先ディレクトリ）、name_space（cache_rootのサブディレクトリ名）、default_expires_in（保存期間）を指定します。 use Cache::FileCache; my $cache = Cache::FileCache->new({ cache_root => '/tmp', name_space =>
Web::Query - Yet another scraping library like jQuery - metacpan.org
NAME Web::Query - Yet another scraping library like jQuery VERSION version 1.01 SYNOPSIS use Web::Query; wq('http://www.w3.org/TR/html401/') ->find('div.head dt') ->each(sub { my $i = shift; printf("%d %s\n", $i+1, $_->text); }); DESCRIPTION Web::Query is a yet another scraping framework, have a jQuery like interface. Yes, I know Ingy's pQuery. But it's just alpha quality. It doesn't work. Web::Qu
「優れたPerlプログラマを見分ける27の質問」の日本語訳 - Islands in the byte stream (legacy)
(追記あり) How to Identify a Good Perl Programmer (by chromatic) が面白かった*1ので、27の質問を訳してみました。chromatic氏によれば、いずれも単純明快な質問でPerlの哲学や特徴をよく現しており、優れたPerlプログラマであれば少なくとも80%は答えられるべきだそうです*2。あなたは全ての質問に答えられますか？ Perl5において変数のシジル*3が示すものは何か 配列のアクセスする際の $items[$index] と @items[$index] の違いは何か == と eq の違いは何か ハッシュをリストコンテキストで評価すると得られるものは何か Perlドキュメントからキーワードを検索するにはどのようにするのか Perl5における関数とメソッドの違いは何か Perl5が変数のメモリを再利用するのはいつか 変数のスコー
Big Sky :: VimmerなPerl開発環境
えーっと、IDE使ってません。ごめんなさい。 PerlをIDEで書いてる人、どれくらいいるんだろう。何使ってるんだろ。 私はLinuxでもWindowsでもVimを使ってます。Perlってサーバで使われる事が多いし、サーバだとsshで入る事が多いだろうし、まぁXの転送やVNCやそれっぽいのでグラフィカルに操作しても良いけど、正直PerlのドキュメントもテキストベースだしPerlで入力補完出来るグラフィカルエディタもまず無いと思ってる。 で、私がVim上で使ってるPerlの開発を「200倍便利にするスクリプト」を紹介。 perldoc.vim perldocはPerlのオンラインマニュアルなんだけど、これを一々ターミナルに戻ったりして引いてると時間のロス。screenで分割して開いてもいいんだけどscreenの画面間移動よりもVim内でのウィンドウ間移動の方が操作感が統一出来てて良い。 そこ
豆知識 - 知っておくと役に立つ - Perl入門ゼミ
Perl › 豆知識 知っておくと何かとPerlが使いやすくなったり、読みやすくなるかもしれないことをいろいろと追加していきます。 BEGIN BEGINはコンパイルのときに実行するということをあらわします。 BEGIN { # コンパイルのときに実行したい文 } require requireはuseと似ていますが実行時にモジュールを読み込むことと、importメソッドを自動的に実行しないところがことなります。 use File::Basename 'basename'; # 上と同じ意味 BEGIN { require File::Basename; File::Basename->import('basename'); } 動的にモジュールを読み込みたい場合はrequireを使用することがありますが、一般的な用途ではuseで統一するのがわかりやすいでしょう。 local localは
memcachedを介して、PerlとRubyでデータをほげほげしてみる - (ﾟ∀ﾟ)o彡 sasata299's blog
2009年10月19日22:50 Perl Ruby memcachedを介して、PerlとRubyでデータをほげほげしてみる ふと思って、Ruby でデータを memcached に入れて、それを Perl から取り出せるのかな〜というのが気になったので試してみました。データの形式として、文字列、ActiveRecord、ハッシュをそれぞれ試してみます。予想では、ActiveRecord のデータはさすがに Perl では読み込めないだろうけど、それ以外は読み込めるんじゃないかなぁと。 まずは Ruby を使って memcached にデータを set します。 #!/usr/bin/ruby require 'rubygems' require 'activerecord' require 'memcache' class Hoge < ActiveRecord::Base estab
新人教育 - Unknown::Programming
明日からちょっと遅めのゴールデンウィークということでなんか更新しとくか。 まっさらな新人にPerl教えるのって本当にきついですね。 専門学校レベルのC言語しかやったことないとかいう人は配列やfor文を凄く好む。 ハッシュやforeach使えよと。 はたまた学校でPerlやってましたとか言う人もstrictってなんですか？ってな状態だし。 というかね、専門学校で教えられてるPerlのレベルがね、10年くらい時が止まってるんじゃねーのか、と思うくらいレベルが低いのがなんとかならんかなと。（ということはPerlでOOPとかstrictとかCPANとかを教えてくれるような専門学校があったら凄い生徒集まるんじゃない！？いやいや、世の中はPHP主流になりつつあるらしいぞ） いや、まとにかく勉強しないといけない項目を箇条書きでざーっと上げてみようか。 foreach文 ハッシュ 配列操作関数push,s
Perl での動的関数呼び出し - りもーと・せんしんぐ
Windows Azure の Perl での REST API を紹介するためのサンプルとして掲示板でも作ろうかと思ったのですが、なんというか、見込みの甘さに嵌りました。 世に出ている掲示板CGIのコードが汚い。 まぁ、難読化ツールを使っているのでしょうけど、use strict; を追加するだけで溢れるエラーの数々に、データ部を差し替えてやればいいや、とか思っていた見込みを放り投げて、一から作ってます（ｗ で、溢れるグローバル変数は論外として（なんでこんなコードが世に溢れているのか理解しがたい）、次に気になったのが、フォームのコマンド文字列によって if 〜 elsif 〜 else がだらだらと続くコード。 コマンド・パターンか何かで簡単に書けないかとちょっと漁りました。 パッケージで関数名が取れるじゃないですか。あとはこれと eval を組み合わせれば、簡単にコマンド化できますよね
HTML::Templateで困っています→解決 - 結城浩のはてなブログ
PerlのHTML::Templateモジュールって、hashrefのarrayrefしか扱えないのでしょうか。以下に例を示します。サンプル1はよいのだけれど、サンプル2はどうテンプレートを書けばよいか、という話題です。サンプル2はhashrefのhashrefですね。もしどなたか情報があればご教示ください。 サンプル1: （これはOK） use strict; use warnings; use HTML::Template; my $data1 = [ { NAME => 'Alice', AGE => 23 }, { NAME => 'Bobby', AGE => 18 }, { NAME => 'Chris', AGE => 17 }, ]; my $t = HTML::Template->new( scalarref => \<<'EOD', <TMPL_LOOP NAME=US
Scrapcode@はてなダイアリー - HTML::Templateのループ
ボクはHTML::Templateには敏感に反応する人です(^_^;。 PerlのHTML::Templateモジュールって、hashrefのarrayrefしか扱えないのでしょうか。以下に例を示します。サンプル1はよいのだけれど、サンプル2はどうテンプレートを書けばよいか、という話題です。サンプル2はhashrefのhashrefですね。もしどなたか情報があればご教示ください。 2007-05-01 - 結城浩のはてな日記 hashrefのarrayrefしか扱えないはずです。 なので、スマートではないけど、内側のhashrefをarrayrefで囲んでやるのが一つの方法かな？ use strict; use warnings; use HTML::Template; # INFOのhashrefをarrayrefで包みました my $data2 = [ { NAME => 'Alice
CGI::Cookie - Netscape クッキーへのインターフェース
[pod] [xml] 名前 CGI::Cookie - Netscape クッキーへのインターフェース 概要 use CGI qw/:standard/; use CGI::Cookie; # 新しいクッキーを作成し、それを送信します $cookie1 = new CGI::Cookie(-name=>'ID',-value=>123456); $cookie2 = new CGI::Cookie(-name=>'preferences', -value=>{ font => Helvetica, size => 12 } ); print header(-cookie=>[$cookie1,$cookie2]); # 既にあるクッキーを取り出します %cookies = fetch CGI::Cookie; $id = $cookies{'ID'}->value; # 外部ソースから
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
https://osksn2.hep.sci.osaka-u.ac.jp/~taku/osx/perl/perl_utf.html
GitHub - typester/ark-jobeet
https://github.com/typester/ark-advent-2009/tree/master/data/
Perl、勝手に商標登録される。「OPENSOURCE」や「RUBY」「Apache」も申請中 | スラド YRO
PerlHP - Turn Perl into PHP, or was it the other way around?
Git::PurePerl
perl-mongers.org
Perlゼミ(サンプルコードPerl入門)