satoshipのPerl日記

2007-10-26

■ Web::Scraperをコマンドラインで使ってみた 22:48

インストール

$ sudo cpan -i Web::Scraper

http://twitter.com/のタイムラインの発言を取得してみる

$ scraper http://twitter.com/

シェルが起動する。

scraper> process 'td.content > span.entry-content', 'entries[]' => 'TEXT';

スクレイプした。

scraper> d
$VAR1 = {
  'entries' => [
    'entry1',
    'entry2',
    'entry3',
    'entry4',
    'entry5',
    'entry6',
    'entry7',
    'entry8',
    'entry9'
  ]
};

こんな感じで確認できる。

scraper> c
#!/usr/bin/perl
use strict;
use Web::Scraper;
use URI;

my $uri = URI->new("http://twitter.com/");
my $scraper = scraper {
    process 'td.content > span.entry-content', 'entries[]' => 'TEXT';
};
my $result = $scraper->scrape($uri);

コードが表示される。

おもしろい。

参照

■ 今日学んだこと 22:23

「Perlベストプラクティス」から

サブルーチン呼び出しと組み込み関数呼び出しを見分けやすくするために、組み込み関数にはかっこを使用しない
呼び出し元に問題を報告するためにcroak()を使う
決断と結果を目立たせるために、ブロック形式のifを使う
- 制御フロー文以外

コメントを書く

2007-10-22

■ CPAN の使い方メモ 19:10

Part1 正しいPerl/CGIの書き方 - Webプログラミング実力アップ：ITpro より

まとまっていたので(特に CPAN シェルの初期設定値)メモ。記事の本文である、新規作成からリリースまで説明されていて、分かりやすく良い記事でした。

CPAN シェルの起動方法

$ perl -MCPAN -e shell

又は、

$ cpan

CPAN の設定を初期化する方法

cpan> o conf init

キャッシュ・サイズを 100MB に変更する。
ミラーサイト
- 地域はアジアの「2」を選択する。
- 国名は、日本の「7」を選択する。
- 候補は複数選択する。

コメントを書く

2007-06-02

■ 「入門Perl DBI」が届いた 00:48

「オブジェクト指向Perlマスターコース―オブジェクト指向の概念とPerlによる実装方法」の途中ですが、「入門Perl DBI」が届きました。

本ばかり読んでないでコード読めって感じです。

一緒に「Linuxカーネル2.6解読室」も買いました。これでいつ梅雨に入っても安心です。

コメントを書く

2007-05-06

■ 「Effective Perl」を読み終わった 00:19

「入門 GNU Emacs 第3版」に浮気してしまったため、遅れましたが、「Effective Perl (ASCII Addison Wesley Programming Series)」を読み終わりました。

Schwartzian Transformが何のことかも分かりました。

今度は「オブジェクト指向Perlマスターコース―オブジェクト指向の概念とPerlによる実装方法」を読みます。

コメントを書く

2007-04-29

■ 今日の Perl 23:56

今日は「Effective Perl (ASCII Addison Wesley Programming Series)」をひたすら読んでいました。カフェに長居していたら、追い出されるというハプニングもありましたが、やはり内容がおもしろいため、すらすらと進んで 1/3 くらい読み終えました。

気になるところをピックアップして、章ごとにランダムに読み進めているのですが、「リファレンス」と「モジュール」は、この本で初めて学ぶトピックなので、今日読んでしまいました。「リファレンス」はなかなか手強いトピックでした。逆に「モジュール」は、難しいところはなく、今までの疑問が一枚一枚むいてはがされるように解決していく快感がありました。それから、全体的な話ですが、Perl は「何が省略されているのか」を理解するのが重要なんじゃないかなと思いました。

そんなわけで、連休中に読み終えそうなので、「オブジェクト指向Perlマスターコース―オブジェクト指向の概念とPerlによる実装方法」を注文しました。

コメントを書く