• Dev/Perl
  • Dev/Perl
  • Dev/Perl/HENTAI
  • Perl6
    • Dev/Perl/Perl6
    • Dev/Perl/Perl6/example
  • Dev/Perl/example
  • Dev/Perl/exiftool
  • Dev/Perl/perlsh

misc

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

• ​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」
  • ​twitter:takesako/status/12917008421101568
  • source:lab/trunk/Commentary/shibuya.pm​

• ​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

• ​Image::ExifTool - search.cpan.org
  • see exiftool for example
  • ​オレBlog » Exif Orientationタグによる補正方法
  • ​M.C.P.C.: AIファイルからPerlでサムネールを取り出す

    もっとも、Image::ExifTool入れちゃえば、コマンドラインツールが入るので

    $ exiftool -b -ThumbnailImage test.ai > thumbnail.jpg
    

    でできちゃうわけですけれども！

• ​(を) Unicode の16進数の実体参照を正規表現などで元に戻す

  my $a = "情報時代";
  use HTML::Entities;
  print HTML::Entities::decode($a), "\n";
  

  my $a = "情報時代";
  $a =~ s/&#x([0-9A-F]{4});/chr(hex($1))/ge;
  print "$a\n";