[perl]MIME::Liteã®RFC対応ã«é›£ã‚りステã‚モジュールãªMIME::Liteã«ãŠã„ã¦ã€RFC2822ã®4.5.3.1([Page 53]ã‚ãŸã‚Š)ã«æº–æ‹ ã—ãã‚Œã¦ã„ãªã„ã¨æ€ã‚れるç¾è±¡ã«å‡ºãã‚ã—ãŸã€‚ ã¾ãšã€ã“ã®ã‚¬ã‚µãƒ„ãªãƒ†ã‚¹ãƒˆã‚³ãƒ¼ãƒ‰ã‚’見ã¦ã»ã—ã„。 ã“ã®ã‚³ãƒ¼ãƒ‰ã§ã‚„ã£ã¦ã„ã‚‹ã“ã¨ã¯éžå¸¸ã«å˜ç´”ã§ã€æ¥µç«¯ã«é•·ã„æ–‡å—列(1è¡Œ)ã‚’MIME::Lite::encode_8bit() åŠã³ MIME::Lite::encode_7bit() ã«æ¸¡ã—ã€è¿”り値ã®ï¼‘è¡Œã‚ãŸã‚Šã®æœ€å¤§æ–‡å—列長ãŒ990以内ã§ã‚ã‚‹ã‹ã‚’検証ã—ã¦ã„る。 ã§ã€ä»¥ä¸‹ãã®çµæžœ(実行環境ã¯ubuntu-8.04LTS-amd64/perl-5.8.8)。 1..5 ok 1 - use MIME::Lite; ok 2 - 1937 bytes gotten, hugest line 990 bytes. not ok 3 - 2043 bytes gotten, hugest line 1052
{{#tags}}- {{label}}
{{/tags}}