wiki:Dev/Perl

Context Navigation

Version 45 (modified by mitty, 13 years ago) (diff)
--

perlbrew
CPAN
cpanminus
misc

Dev/Perl

XML-RPCを使ってTracのチケットに添付ファイルを投げ込む（Perl編）
メールアドレスに一致する正規表現
```
# $mailre = '^[\x01-\x7F]+@(([-a-z0-9]+\.)*[a-z]+|\[\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\])';
```
という正規表現を提案します。正確なアドレスを弾かずに、「なるべく」おかしなアドレスを弾く正規表現です。
- see also メールアドレスの正規表現

perlbrew

CPAN

cpan:Sub::Signatures
- Use proper signatures for subroutines, including dispatching.

cpanminus

misc

404 Blog Not Found:perl - ワンライナーの書き方入門
- -MO=Deparseでスクリプト化

cpan:B::Deparse - Perl compiler backend to produce perl code

JPerl Advent Calendar 2010

今年も JPerl Advent Calendar の季節がやってきました。 Perl に関連する tips を25本おとどけしちゃいます。 12月1日から毎日一本ずつ tips をアップしていっちゃうという企画です。くわしくはこのあたりをみてください。

Togetter - 「Shibuya Perl Mongersテクニカルトーク#15」

Write good parser in perl

ファイルハンドルをめぐる冒険（ただしマニア向け） - daily dayflower
- ファイルハンドルをネタに、IO:Handleから型グロブまで説明。特に型グロブの図示が分かりやすい。

https://twitter.com/__gfx__/status/16308724930973696

Perlはデフォでどんなシグナルもトラップしないらしい。つまり、SIGINT発行するとENDとかDESTROYは呼ばれない。RubyはSIGINTをトラップするので、デフォルトでENDは呼ばれる。
https://twitter.com/__gfx__/status/16314985630146560

PerlでDESTROYが誤って二回呼ばれてしまうコード例(by kazuho) https://gist.github.com/747040

cpan:Image::ExifTool
- see exiftool for example
- オレBlog » Exif Orientationタグによる補正方法
- M.C.P.C.: AIファイルからPerlでサムネールを取り出す
  
  もっとも、Image::ExifTool入れちゃえば、コマンドラインツールが入るので
```
$ exiftool -b -ThumbnailImage test.ai > thumbnail.jpg
```
  でできちゃうわけですけれども！

Perlでニコニコ動画のflvとコメントxmlをダウンロードする (Yusukebe::Tech)

cpan:Web::Scraper
- Web Scraper Shibuya.pm tech talk #8
- use Web::Scraper; - 今日のCPANモジュール
- 駱駝の背中に乗って行こう : Perlでスクレイピング(Web::Scraperモジュール)
  - Web::Scraperの平易な導入
- scraper CLI で遊ぶ - へたっぴ日記
  - scraper コマンドの使い方
  - 非常に有用
install on Ubuntu 10.04
1. sudo aptitude install -R libhtml-treebuilder-xpath-perl libxml-xpathengine-perl libhtml-selector-xpath-perl libuniversal-require-perl libyaml-perl
2. sudo cpan HTML::TreeBuilder::LibXML
3. sudo cpan Web::Scraper

cpan:threads
- perl multithreading
- Create a LAMP Search Engine Using Multithreaded Perl

Adding Progress Bars to Your Scripts

htmltree => cpan:HTML::TreeBuilder

#!/usr/bin/perl
# Time-stamp: "2000-10-02 14:48:15 MDT"
#
# Parse the given HTML file(s) and dump the parse tree
# Usage:
#  htmltree -D3 -w file1 file2 file3
#    -D[number]  sets HTML::TreeBuilder::Debug to that figure.
#    -w  turns on $tree->warn(1) for the new tree

(snip)

CPAN:Perl::Critic

Critique Perl source code for best-practices.

CPAN:Parallel::ForkManager

SYNOPSIS

use Parallel::ForkManager;

$pm = new Parallel::ForkManager($MAX_PROCESSES);

foreach $data (@all_data) {
  # Forks and returns the pid for the child:
  my $pid = $pm->start and next; 

  ... do some work with $data in the child process ...

  $pm->finish; # Terminates the child process
}

CPAN:Convert::Bencode

No error detection of bencoded data. Damaged input will most likely cause very bad things to happen, up to and including causeing the bdecode function to recurse infintly.
- oh...

Download in other formats:

Plain Text