KENT-WEB ¥µ¥Ý¡¼¥È¥³¡¼¥Ê¡¼ ²áµî¥í¥° [ 0016 ]


µ­»öNo¡§ 10203
Åê¹ÆÆü¡§ 2012/02/29(Wed) 21:11:36
¥¿¥¤¥È¥ë¡§ clipmail¤Ç¤Îʸ»ú²½¤±ÂкöÊýË¡
ID¾ðÊó¡§ suga0001
Åê¹Æ¼Ô¡§ suga1969
URL¡§ http://www.suganamifuton.jp/toiawase-shop.html

¤ªÀ¤ÏäˤʤäƤª¤ê¤Þ¤¹¡£2ǯ¤Û¤ÉÁ°¤«¤éclipmail¤ò»ÈÍѤµ¤»¤Æ¤¤¤¿¤À¤¤¤Æ¤ª¤ê¤Þ¤¹¡£ºÇ¶á¥µ¥¤¥È¤ò¥ê¥Ë¥å¡¼¥¢¥ë¤·¤Þ¤·¤Æ¡¢clipmail¤òVer:1.1¤«¤é¸½¹Ô¤ÎVer: 2.62¤ØÊѹ¹¤µ¤»¤Æ¤¤¤¿¤À¤­¤Þ¤·¤¿¡£

ÀßÃÖ¤ÈÆ°ºî¡¦¥á¡¼¥ëÁ÷¿®¡¦²èÁüźÉÕÁ÷¿®¤Ê¤É¤ÏÁ´¤¯ÌäÂê¤Ê¤¤¤Î¤Ç¤¹¤¬¡¢Á÷¿®¤µ¤ì¤¿¥á¡¼¥ëÃæ¤Ç¡¢Ver:1.1¤Ç¤ÏÀµ¾ï¤Ëɽ¼¨¤Ç¤­¤Æ¤¤¤¿µ¡¼ï°Í¸ʸ»ú¡Ö­ê¡×¤¬Ê¸»ú²½¤±¤·¤Æ¤·¤Þ¤·¤Þ¤¹¡£

¤Þ¤¿¡¢»ÈÍÑÌÜŪ¤ÎÆÃħ¤È¤·¤ÆÆþÎϼԤÎÊý¤¬¥»¥ó¥Á¥á¡¼¥È¥ë¤Î¡Öcm¡×¤òÆþÎϤ¹¤ë¤³¤È¤¬Â¿¤¤¤Î¤Ç¤¹¤¬¡¢¤½¤ì¤¬»þ¡¹¡ÊËè²ó¤Ç¤Ï¤Ê¤¯¡Ë¡Ö?p¡×¤Èʸ»ú²½¤±¤·¤Þ¤¹¡£

¡ÊÎã¡Ë15cm¡ß28cm ¢ª¡¡15?p¡ß28?p

¤·¤«¤·¡Öcm¡×¤ÈÆþÎϤ·¤Æɬ¤º¡Ö?p¡×¤È¤Ê¤ë¤Î¤Ç¤Ï¤Ê¤¯¡¢¼«Ê¬¤ÇÆþÎϤ·¤Æ»î¤·¤Æ¤ß¤Æ¤âºÆ¸½À­¤¬ÆÀ¤é¤ì¤Þ¤»¤ó¡£¡Ê²½¤±¤Æ¤·¤Þ¤Ã¤Æ¤¤¤ë¤Î¤ÇºÇ½é¤ÎÆþÎϤ¬¡Öcm¡×¤«¤É¤¦¤«¼ÂºÝ¤Ë¤Ïʬ¤«¤é¤Ê¤¤¤Î¤Ç¤¹¤¬¡¢¤ª¤½¤é¤¯¡Ö­Â¡×¤Ç¤Ï¤Ê¤¤¤È»×¤¤¤Þ¤¹¡£¡Ë

¤É¤Î¤è¤¦¤ËÂн褹¤ì¤Ð¤è¤í¤·¤¤¤Ç¤·¤ç¤¦¤«¡£¤É¤¦¤«¤è¤í¤·¤¯¤ª´ê¤¤¤¤¤¿¤·¤Þ¤¹¡£

¡Ê½¤ÀµÄɵ­¡Ë
»²¹Í¤Ë¤Ê¤ë¤«¤É¤¦¤«¤ï¤«¤ê¤Þ¤»¤ó¤¬´Ø·¸¤¹¤ë¤«¤â¤·¤ì¤Ê¤¤¾ðÊó¤òµ­Æþ¤µ¤»¤Æ¤¤¤¿¤À¤­¤Þ¤¹¡£

¡¦init.cgi¤Ê¤É¤Î¥×¥í¥°¥é¥à¤Ç¡¢ÀßÄê¤Î¥¬¥¤¥É¤òÉÕ¤±¤Æ¤¤¤¿¤À¤¤¤Æ¤¤¤ë°Ê³°¤ÎÃæ¿È¤ÎÉôʬ¤Ï¼ê¤òÆþ¤ì¤Æ¤¤¤Þ¤»¤ó¡£

¡¦¥µ¡¼¥Ð¡¼¤Ï¤µ¤¯¤é¥¤¥ó¥¿¡¼¥Í¥Ã¥È¤Î¥ì¥ó¥¿¥ë¥µ¡¼¥Ð¡¼

# ʸ»ú¥³¡¼¥É¼«Æ°È½ÊÌ¡Ê0=no 1=yes¡Ë
# ¢ª ¥Õ¥©¡¼¥à¤Îʸ»ú¥³¡¼¥ÉȽÊ̤ò¹Ô¤¦¾ì¹ç
# ¢ª ¥Õ¥©¡¼¥à¤¬Shift_JIS¤Î¾ì¹ç¤Ï¡Ö0¡×¤Ç³µ¤ÍOK
$cf{conv_code} = 0;
¤³¤Á¤é¤Ï½é´üÀßÄê¤Î¡Ö0¡×

¡¦¡Ö­ê¡×¤À¤±ÆþÎϤ¹¤ë¤È¡Ö??¡×¤È¤Ê¤ê¡¢»î¤·¤Ë¡Ö­ê»°±º¹©Ì³Å¹¡×¤ÈÆþÎϤ·¤¿¤é¡Ö?³îO±º¹©Ì³Å¹¡×¤È¤Ê¤ê¤Þ¤·¤¿¡£

¡¦¥×¥ì¥Ó¥å¡¼¤Î»þÅÀ¤Ç¤Ïʸ»ú²½¤±¤·¤Þ¤»¤ó¤¬¡¢ÆϤ¤¤¿¥á¡¼¥ë¤Ç¤Ïʸ»ú²½¤±¤·¤Þ¤¹¡£

¡Ö¥Æ¥¹¥ÈÁ÷¿®¡×¤È¤¤¤Ã¤¿¤ªÌ¾Á°¤Ë¤·¤Æ¤¤¤¿¤À¤±¤ì¤ÐÁ÷¿®¤ò¼Â¹Ô¤¤¤¿¤À¤¤¤¿¤âOK¤Ç¤¹¡£

¤É¤¦¤«¤è¤í¤·¤¯¤ª´ê¤¤¤¤¤¿¤·¤Þ¤¹¡£


µ­»öNo¡§ 10205
Åê¹ÆÆü¡§ 2012/03/01(Thu) 17:43:41
¥¿¥¤¥È¥ë¡§ Re: clipmail¤Ç¤Îʸ»ú²½¤±ÂкöÊýË¡
ID¾ðÊó¡§ teketen
Åê¹Æ¼Ô¡§ ¤Æ¤±¤Æ¤ó

Unicode::Japanese.pm¤ò»ÈÍѤ¹¤ë¤³¤È¤Ë¤è¤Ã¤Æ¡¢Ê¸»ú²½¤±¤¬²ò¾Ã¤¹¤ë¤È»×¤¤¤Þ¤¹¡£
¤Þ¤º¡¢
http://search.cpan.org/~hio/Unicode-Japanese-0.49/
¤Ë¤Æ¡¢Unicode::Japanese.pm¤ò¥À¥¦¥ó¥í¡¼¥É¤·¤Æ¤¯¤À¤µ¤¤¡£
tar.gz·Á¼°¤Î°µ½Ì¥Õ¥¡¥¤¥ë¤ò²òÅà¤Ç¤­¤ë¥½¥Õ¥È¤òÍÑ°Õ¤·¤Æ¡¢²òÅष¤Æ¤¯¤À¤µ¤¤¡£
²òÅष¤¿¤é¡¢lib¥Õ¥©¥ë¥À¤ÎÃæ¤ËUnicode¥Õ¥©¥ë¥À¤¬¤¢¤ê¤Þ¤¹¤Î¤Ç¡¢¤½¤ì¤òclipmail¤Îlib¥Õ¥©¥ë¥À¤Ë³ÊǼ¤·¤Æ²¼¤µ¤¤¡£

¼¡¤Ë¡¢clipmail.cgi¤ò¥Æ¥­¥¹¥È¥¨¥Ç¥£¥¿¤Ê¤É¤Ç³«¤­¤Þ¤¹¡£

clipmail.cgi v2.62

407¹ÔÌÜÉÕ¶á¤È355¹ÔÌÜÉÕ¶á

Jcode::convert(\$tmp, 'jis', 'sjis');

¤ò

my $s = Unicode::Japanese->new($tmp,'auto');
$tmp = $s->jis;

¤Ë¡¢316¹ÔÌÜÉÕ¶á

Jcode::convert(\$resbody, 'jis', 'sjis');

¤ò

my $s = Unicode::Japanese->new($resbody,'auto');
$resbody = $s->jis;

¤Ë¡¢299¹ÔÌÜÉÕ¶á

Jcode::convert(\$tbody, 'jis', 'sjis');

¤ò

my $s = Unicode::Japanese->new($tbody,'auto');
$tbody = $s->jis;

¤Ë¤½¤ì¤¾¤ìÊѹ¹¤·¤Æ²¼¤µ¤¤¡£
¤½¤·¤Æ¡¢18¹ÔÌÜÉÕ¶á

# JcodeÀë¸À
my $j = new Jcode;
¤ÎÁ°¤Î¹Ô¤Ë¤Ç¤â

use Unicode::Japanese qw(PurePerl);

¤òµ­½Ò¤·¤Æ²¼¤µ¤¤¡£
¤³¤ì¤Ç¡¢µ¡¼ï°Í¸ʸ»ú¤¬Ê¸»ú²½¤±¤¹¤ë»ö¤Ï¤Ê¤¤¤È»×¤¤¤Þ¤¹¡£
¤â¤·¤â¡¢Æ°ºî¤ËÌäÂ꤬¤¢¤Ã¤¿¾ì¹ç¤Ï¡¢¸µ¤ËÌᤷ¤Æ¤¯¤À¤µ¤¤¡£
¤Þ¤¿¡¢²þ¤¤Ï¼«¸ÊÀÕǤ¤Ç¤ª´ê¤¤¤·¤Þ¤¹¡£


# ¤´»ØŦÂפ­¤Þ¤·¤¿¤Î¤Ç¡¢´Ö°ã¤¨¤¿²Õ½ê¤Ï½¤ÀµÃפ·¤Þ¤·¤¿¡£¼ºÎ餷¤Þ¤·¤¿¡£
# ¤ªÌò¤ËΩ¤Æ¤Æ¤è¤«¤Ã¤¿¤Ç¤¹¡£


µ­»öNo¡§ 10207
Åê¹ÆÆü¡§ 2012/03/01(Thu) 21:42:27
¥¿¥¤¥È¥ë¡§ ¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤·¤¿¡Ê°ìÉôÊѹ¹¤·¤ÆÆ°ºî¤·¤Þ¤·¤¿¡Ë
ID¾ðÊó¡§ suga0001
Åê¹Æ¼Ô¡§ suga1969
URL¡§ http://www.suganamifuton.jp/toiawase-shop.html

> 299¹ÔÌÜÉÕ¶á
> Jcode::convert(\$tbody, 'jis', 'sjis');
>
> ¤ò
>
> my $s = Unicode::Japanese->new($resbody,'auto');
> $resbody = $s->jis;
>
> ¤Ë¤½¤ì¤¾¤ìÊѹ¹¤·¤Æ²¼¤µ¤¤¡£

¤³¤Á¤é¤Î¡Öresbody¡×¢ª¡Ötbody¡×¤ËÊѹ¹¤·¤¿¤éÀµ¾ï¤ËÆ°ºî¤·¡¢Ê¸»ú²½¤±¤â²ò¾Ã¤¤¤¿¤·¤Þ¤·¤¿¡£

¤«¤Ê¤êº¤¤Ã¤Æ¤¤¤Þ¤·¤¿¤Î¤Ç¡¢ÂçÊѽõ¤«¤ê¤Þ¤·¤¿¡£ËÜÅö¤ËËÜÅö¤Ë¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤·¤¿¡ª


[¸¡º÷¥Ú¡¼¥¸] [·Ç¼¨ÈÄ]