日時文字列を UNIX 日時に何も考えずに変換できるのがいいです。

最近初めて post を使ってみました。考え方が C# と似てると思います。

v0.30 で au の EZweb 絵文字に対応してくれたみたい! 作者さんありがとう!

getcode の encode として {jis,sjis,euc,utf8}-au が増えてます。
conv の encode として jis-au,{jis,sjis,euc,utf8}-icon-au{1,2} が増えてます。
1 と 2 では対応している絵文字の数が違います。省略すると 2 です。

use Unicode::Japanese;
my $u = Unicode::Japanese->new;
my $str = "\e\$Bx4u0u1vE\x7a\x78\x7b\x50\x7a\x70\e(B";
print $u->getcode($str)."\n";
print $u->set($str,'jis-au')->conv('sjis-icon-au1')."\n";
print $u->set($str,'jis-au')->conv('sjis-icon-au2')."\n";

utf-8への変換表が正しくない気がしますが、
韓国語など日本語以外も考慮する場合はこれを使わざるを得ません。
返ってくる値に癖があるので注意が必要です。

日本語以外でもちゃんと推測できるので気に入りました。
変換表や返ってくる値に癖があるので注意が必要です。

use Encode;
use Encode::Guess qw/euc-jp utf8/;
my $x = 'ほげ';
my $guess = Encode::Guess::guess_encoding($x,qw/euc-jp utf8/);
if (ref $guess) {
  $x = Encode::decode($guess->;name,$x);
}

使ってます。

これだけのコードで PDF のページ数を取得できるのは便利です。
もちろんもっとたくさんの機能がありますが。

use strict;
use PDF::API2;
my $pdf = PDF::API2->;open('test.pdf');
my $pages = $pdf->;pages;

強力です。Microsoft Access のデータベース(mdb) に SQL クエリを出すのに使っています。