eoblog㯠2017å¹´3æ31æ¥ï¼éï¼15ï¼00 ããã£ã¦ãµã¼ãã¹ãçµäºãããã¾ããã é·å¹´ã«ããããæé¡§ããã ãèª ã«ãããã¨ããããã¾ããã
eoblog㯠2017å¹´3æ31æ¥ï¼éï¼15ï¼00 ããã£ã¦ãµã¼ãã¹ãçµäºãããã¾ããã é·å¹´ã«ããããæé¡§ããã ãèª ã«ãããã¨ããããã¾ããã
â»ååã®ç¶ãã§ãã è¨å®ãã¡ã¤ã«ãããã ï¼ï¼odbc.iniã®ç·¨é # vim /usr/local/etc/odbc.ini -- [ODBC Data Sources] <span style="color:#FF0000;">freetds = FreeTDS ODBC Driver [freetds] Driver = /usr/local/lib/libtdsodbc.so Description = Microsoft SQL Server Servername = mssql Database = dbnameï¼ï¼freetds.confã®ç·¨é # vim /usr/local/etc/freetds.conf -- [mssql] host = 192.168.XXX.XXX port = 1433 tds version = 8.0 charset = sjis cli
unixODBC+FreeTDS+DBD::ODBCã§SQL Serverã«æ¥ç¶ãã æè¿ã¯ãªããã®ã¤ã³ã¹ãã¼ã«ä½æ¥ãè¡ããã¨ãå¤ãã§ãã ååã®Apache2.2.2ï¼PHP5.1.4ï¼MySQL5.0.21ï¼ShareToDoã«ç¶ã仿¥ã¯Linuxãµã¼ãã¼ããMS SQL Serverã«æ¥ç¶ãã¦Perl DBIã§æä½ã§ããããã«è²ã 試è¡é¯èª¤ãã¾ããã ãã®ã¡ã¢ã åã è·ã§ãåããããªãã¨ããããã¨ãããããã®ã¨ãã¯SQL Serverã®ãµã¼ãã¼ã«Active Perlãå ¥ãã¦ããã§DBI::Proxyserverï¼DBD::ODBCåããã¦ãã¯ã©ã¤ã¢ã³ãããã¯DBD::Proxy使ã£ã¦æä½ãã¾ããã ãã®ã·ã¹ãã ã¾ã åãã¦ãã®ããªâ¦ ã ããä»åã¯ãµã¼ãã¼ã«Perlãã¤ã³ã¹ãã¼ã«ãããã¨ã¯ç¡çãããªã®ã§ãéãæ¹æ³ãåããã¨ã«ã ããã§é¸ãã ã®ãunixODBCï¼FreeTDSã¨ããæ¹æ³ã§
ã¨ããã®ãä½ã£ãã®ã§èªå·±ç´¹ä»ãã¾ãã 2æé ãããã³ã³ãã¥ã¼ã¿ã§ã¢ãã¡é¡ãæ¤åº&è§£æããæ¹æ³ããããã試ãã¤ã¤ä½ã£ã¦ãã¦ããã®ææã®ã²ã¨ã¤ã¨ãã¦ãç¡çããåºåããã©ã¤ãã©ãªã§ãã ã¯ããã« ã¯ããã«ãã£ã¨ã©ã¤ãã©ãªã®ç´¹ä»ãæ¸ãã¦ããã¨ã®ã»ãã§ã¯è©³ç´°ãªå¦çã®è©±ãåã®èããè¶ äº¤ãã¤ã¤ã°ãã°ã ã¨æ¸ãããã¨æãã¾ãã Imager::AnimeFaceã§ã§ããã㨠Imager::AnimeFaceã¯ãç»åã«å«ã¾ããã¢ãã¡ãã£ã©ã¯ã¿ã¼çãªäººç©ã®é¡ã®ä½ç½®ãæ¤åºããããã«ç®ãå£ãªã©é¡ãæ§æããé¨åä½ç½®ã大ããã®æ¨å®ãèã髪ã®è²ã®æ½åºãç°¡åã«è¡ããã¨ãã§ããã©ã¤ãã©ãªã§ãã ããããå¯è½ã«ãªãã¨ã ç»åããèªåã§ããæãã®ãµã ãã¤ã«ã使ã§ãã åç»ããèªåã§ããæãã®ãµã ãã¤ã«ã使ã§ãã èªåçã«ãã¬ã¬ç»åãä½ãã èªåçã«å ¨å¡ã®é¡ãââã«ã§ãã é¡ãã¼ã¹ã®ãã¼ã«ã«ç»åæ¤ç´¢ ãªã©ãææ°éã®ã½ãªã¥ã¼ã·
æååãæ°å¤ãASCII(ã¢ã¹ãã¼)ã³ã¼ãã«å¯¾å¿ããæåã«å¤æããã«ã¯ãchr颿°ã使ç¨ãã¾ãã #!/usr/bin/perl use strict; use warnings; # ASCIIæåã³ã¼ãã§ã¯65,66,67ã¯ãããã 'A','B','C'ã«å¯¾å¿ããã my $a_num = 65; my $b_num = 66; my $c_num = 67; print chr( $a_num ), "\n"; print chr( $b_num ), "\n"; print chr( $c_num ), "\n"; __END__ ç¶ããèªã
ãµãã¨ã¯å½¼å¥³ã®èªå® è¿ããæ¹åå°é§ åã®ã¹ã¼ãã¼ãã¼ã±ããã§å¾ ã¡åãããããã彼女ã¯èªè»¢è»ã§å¾ãã追ãã¤ãã¨è¨ããåã¯å¤§ããªã³ã¤ã³ãã¼ãã³ã°ã¸è»ãåãããç èã䏿¬å¸ã£ã¦ããã¹ã¼ãã¼ãã¼ã±ããã¸åããã¨ãã²ã£ãããªãã«ä¸»å©¦çãªå¥³æ§ããã°ãã¡ãããå ¥ãå£ãåºããå ¥ã£ãããã¦ãããæå»ã¯åå¾5æã«ãªããæè¨ããç®ãä¸ããã¨ãå¾ ããã¡ãã£ãããã¨å¤§ãã¦æªã³ãã¦ãªãæ§åã§ãµããæã¶ãã§ãã£ã¦ããã ãç¤¼ã«æçãä½ãã¨ã¯ããããµãã®å®¶ã«ã¯é£æãååè¶³ãã¦ããªããããããããã¦ã¹ã¼ãã¼ãã¼ã±ããã«å¯ããã¨ã«ãªã£ãããµãã¯éèã³ã¼ãã¼ããç²¾èã³ã¼ãã¼ã¾ã§ãã¾ãã§åªç§ãªã«ã¼ããã«å°ãããããã«ç¡é§ãªãç¹æ¤ãã¦ãã£ããæ¬²ãã飿ãããã¨ã2ç§éç¨åº¦ããããåè¦ããä¸åº¦æã«åã£ããããããããè±èãããè¿·ããã¨ãªãåãæã£ã¦ããã«ã´ã«æ¾ãè¾¼ãã ãæå¾ã«ã¢ã«ã³ã¼ã«é£²æãå·ãããã¦ããæ£ã®åã¸è¡ãã¨ãç§ã飲ãããã¨ã
ååã®è¨äºãæãããã¦ãããã³ããªå ¥ãããã®ã§ï¼ã¡ãã£ã¨ããºãã¨æãã ååã®è¨äºãé£ããã¨æã£ãã¨ãã¦ãï¼ããã¯æ¥ãã¹ããã¨ã§ã¯ããã¾ããã ããã¾ã§ Perl ã®å 鍿§é ã®è©±ã§ããã*1ã ãã ï¼Perl ã§æååãæ±ãï¼æåã³ã¼ããæ±ãã®ã¯é£ããï¼ã¨æãããã®ã¯æ¬ä½ã§ã¯ãªãã§ãã ã¨ããã®ã¯ï¼æ¬å½ã¯ï¼é£ããèããªãã§ãåãããã«ä½ããã¦ã¾ãããã æã表ç¾ãªãã®ã§ä¸ããç®ç·ã«æãããããããããªããã ããã¡ãã£ã¨è©³ããæ¸ãã¾ãã Perl ã®æååã®æ±ãã¯ï¼ãªãã¹ã徿¹äºææ§ã確ä¿ããªããï¼é²åãã¦ãã¾ããã ãã®ããï¼ãããããªææ³ï¼çµã¿æ¹ã§ãåãããã«ã§ãã¦ãã¾ãããã¨ãã° æåã³ã¼ãï¼ä½ããï¼æ°ã«ããªã ãã¹ã¦ãã¤ããªåã ã¨ã¿ãªãï¼ä¸ã¨ã»ã¼åãæå³ã§ããï¼ å é¨ã³ã¼ãã£ã³ã°ã EUC-JP octet stream ã«ãã å é¨ã³ã¼ãã£ã³ã°ã UTF-8 octet stre
ãªãªã¼ã¹ãé害æ å ±ãªã©ã®ãµã¼ãã¹ã®ãç¥ãã
ææ°ã®äººæ°ã¨ã³ããªã¼ã®é ä¿¡
å¦çãå®è¡ä¸ã§ã
j次ã®ããã¯ãã¼ã¯
kåã®ããã¯ãã¼ã¯
lãã¨ã§èªã
eã³ã¡ã³ãä¸è¦§ãéã
oãã¼ã¸ãéã
{{#tags}}- {{label}}
{{/tags}}