えーと、あれー?

Filed in Perl, prog

 以前書いたメールをうんちゃらのスクリプトなんですが。Perl で MIME::Base64 モジュールと MIME::QuotedPrint モジュール使って復号化してます。
 しかしなにやら文字化けなさるんですよね。んで元データ見てみたらなにやら微妙に不正なデータ。曖昧変換できたらまあいけるんだろうなって感じなんですが、MIME モジュールは割と厳密な変換をするようで化けます。
 これ何とかならないんですかね? オプションとかで曖昧変換出来たりとかしないんですかね?
 ああ、そう言えば use MIME::Explode; してる割に使ってないなw ヘッダの解析にせswitch 文でやっちゃってるよ'`,、(´∀`)'`,、



Warning: sprintf() [function.sprintf]: Too few arguments in /home/users/2/lolipop.jp-dp07042166/web/wordpress/wp-includes/widgets.php on line 1042
Oenology Post Formats
Click to view/hide

Warning: sprintf() [function.sprintf]: Too few arguments in /home/users/2/lolipop.jp-dp07042166/web/wordpress/wp-includes/widgets.php on line 1042
Posts Calendar
Click to view/hide
2005年5月
« 4月   6月 »
1234567
891011121314
15161718192021
22232425262728
293031  

Warning: sprintf() [function.sprintf]: Too few arguments in /home/users/2/lolipop.jp-dp07042166/web/wordpress/wp-includes/widgets.php on line 1042
アーカイブ
Click to view/hide

Warning: sprintf() [function.sprintf]: Too few arguments in /home/users/2/lolipop.jp-dp07042166/web/wordpress/wp-includes/widgets.php on line 1042
最近の投稿
Click to view/hide