phpmyadminインストール yum install phpmyadmin /usr/share/phpmyadmin にインストールされる。 /usr/share/phpmyadmin/config.inc.phpを編集 $cfg['blowfish_secret']を設定。 /* * This is needed for cookie based authentication to encrypt password in * cookie */ $cfg['blowfish_secret'] = '*************'; /* YOU MUST FILL IN THIS FOR […]
MySQL4.12が稼働しているサーバにMySQL5.0.67(Ttitonn)をインストールする（MySQL4.12はYUMでインストール済） my.cnf (MySQL4.12) [mysqld] datadir=/var/lib/mysql socket=/var/lib/mysql/mysql.sock # Default to using old password format for compatibility with mysql 3.x # clients (those using the mysqlclient10 compatibility package). old_pa […]
CentOS 4.4 wget http://iij.dl.sourceforge.jp/senna/33763/senna-1.1.4.tar.gz tar xzf senna-1.1.4.tar.gz cd senna-1.1.4 ./configure --prefix=/usr/local make su-- make install
１）MeCabのインストール UTF8で使用する。 UTF-8 only modeとして使用する wget http://downloads.sourceforge.net/mecab/mecab-0.97.tar.gz tar xvfz mecab-0.97.tar.gz cd mecab-0.97 ./configure --with-charset=utf8 --enable-utf8-only make su -- make install ２）辞書ipadic2.7.0 のインストール UTF8で使用する。 wget http://downloads.sourceforge.net/ […]
PERLでMySQLにデータを挿入する実験。 実験スクリプト INSERT を100万回繰り返す。 for(1..1000000){ $sql = <<"EOM"; INSERT INTO `table_name` (`col1`,`col2`,`col3`,`col4`) VALUES ('10','11','12','13'); EOM $sth = $dbh->do($sql)|| die $dbh->errstr; } 結果：途中でサーバエラー Server error! The server encountered an internal error and […]
CGIでダミー画像(GIF)を表示するだけのスクリプト。画像データ必要なし。 my @dummy = ("47","49","46","38","39","61","08","00","08","00","80","00","00","00","00","00","FF","FF","FF","21","F9","04","01","00","00","01","00","2C","00","00","00","00","08","00","08","00","40","02","06","8C","8F","A9","CB","ED","5D","00","3B" );print "Cont […]
HTMLから本文を抜き出せるモジュール HTML::ExtractContent 作者：伊奈林太郎(id:tarao) 解説スライド：http://up.orezdnu.org/papers/Kansai.pm/2009-03-22/slide.pdf 参照：http://perl-mongers.org/2008/10/extract-content-from-html.html HTML::ContentExtractor 参照：http://d.hatena.ne.jp/tohtas/20081102/1225642884 HTML::ContentExtractor + Lingua: […]
package abc;use CGI;・・・略package def;use CGI; このようにuseで複数回モジュールを呼び出した場合はどうなるのか？ どうやらPerlは内部でuseしたライブラリ名を記憶していて、同じモジュールをuseしない(2回目のuseは無視)ようになっているので、二カ所（またはそれ以上）で同じモジュールをuseしても、全く問題無い。
$COUNT = $dbh->selectrow_array("SELECT COUNT(*) FROM `テーブル名` WHERE `カラム` = '条件'");
$sql = "INSERT INTO `db_01` ( data1, data2 ) VALUES ( $data1, $data2 )"; $sth = $dbh->prepare( "$sql" ); $sth->execute(); $id = $sth->{mysql_insertid}; これで$idに「自分が追加した最新のauto_increment番号」が代入される ただし下記のようにdoでは使えない。 $sql = "INSERT INTO `db_01` ( data1, data2 ) VALUES ( $data1, $data2 )"; $sth […]
