µ»ö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¡×¤ËÊѹ¹¤·¤¿¤éÀµ¾ï¤ËÆ°ºî¤·¡¢Ê¸»ú²½¤±¤â²ò¾Ã¤¤¤¿¤·¤Þ¤·¤¿¡£
¤«¤Ê¤êº¤¤Ã¤Æ¤¤¤Þ¤·¤¿¤Î¤Ç¡¢ÂçÊѽõ¤«¤ê¤Þ¤·¤¿¡£ËÜÅö¤ËËÜÅö¤Ë¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤·¤¿¡ª