データベースを利用していて、割と使用頻度の高い関数mysql_insert_id()
同時に書き込んだ場合、この値が狂うとこまるし、テーブルをロックしたほうがいいのかどうかを調べてみました。
PHP: mysql_insert_id – Manualによれば、セッションで管理されていて、MySQLのlast_insert_idと同じ機能だということです。
つまり、テーブルをロックする必要はないということでした。
「スクリプト」カテゴリーアーカイブ
PHPでExcelを読み書きする
PHPでEXCELを読み書きするには、
- Spreadsheet_Excel_Writer
- Spreadsheet_Excel_Reader
が便利です。
ドキュメントの使い方だけを載せているサイトは沢山ありますが、インストール方法を載せているサイトはぜんぜん無いので書いておきます。
WriteはPEARに登録されていますが、Readerは手動でインストールする必要があります。それにWriteの利用にはOLEのインストールも必要になります。WriterとOLEは共に開発版だったので、-fオプションをつけてインストールする必要があります。
pear install -f OLE
pear install -f Spreadsheet_Excel_Writer
次にReaderのインストールですが、SourceForgeで公開されているので、書庫を保存します。
必要なファイルはExcelフォルダとその中にある2つのファイル「reader.php」と「oleread.inc」です。
Excelのディレクトリごと、PEAR保存フォルダの「Spreadsheet」ディレクトリにコピーします。
本来はこれで仕えるはずですが、残念ながらそうは行きません。
reader.phpを編集してrequireするファイル名を変更します。31行目を削除またはコメントアウトして、1行追加してください。
//require_once 'Spreadsheet/Excel/Reader/OLERead.php';
require_once 'oleread.inc';
OLERead.phpは検索しても出てこないので、PEARに登録するときにこの名前にするつもりだったとか、開発環境ではこの名前になっているとか言う落ちでしょう。自分でもたまにやりますから。これでSpreadsheet_Excel_Readerが動くようになりました。このライブラリの使い方は別の機会に。
おまけ
Writerの解説ページ
Excelを読むにはPerlとPHPのどちらが便利?
Excelのデータを読む必要が出てきました。
稼動しているシステムでは表向きはPHP、内部はほぼPerlという、
純粋なPHPプログラマにはお手上げのシステムです。
もちろん私はPerlerなので、痛くも痒くもありませんが。
さて、例によってPerlとPHPの間にゴングが鳴らされました。
Perlはお決まりのものがあるので置いといて、PHPのPEARでExcelを探してみると・・・
- Spreadsheet_Excel_Writer: Package for generating Excel spreadsheets
- Structures_DataGrid_DataSource_Excel: DataSource driver using Excel spreadsheets
- Structures_DataGrid_Renderer_XLS: Renderer driver using PEAR::Spreadsheet_Excel_Writer
この3つがヒットしました。
ちなみに、PECLには登録なしでした。
なんかいまいちっぽいので、PEARに登録の無いものを探してみることに。
PHPExcelなるものを発見しました。
このライブラリを取り上げているサイトは多いけど、
実際に使っていたり、サンプルコードを掲示しているサイトが一つも無い・・・
Documentを読んだ限りでは多機能だとわかりますが、
本当に動くかどうか検証されていないものをシステムに入れるわけには行きません。
やはり使い慣れたPerlモジュール「Spreadsheet::ParseExcel」の出番ですか・・・
Flash MXにはマイターリミットが無い
Flashに図形を描く機能を持たせたツールを作ってますが、
PostScriptにはあるはずの機能が無いことに気がつきました。
そう、線をつなげた場合の角のパラメータ、マイターリミット。
検索してみたらAdobeのサイトに行き着いたのでlistStyleの項目を読んでいくと、
このパラメータを指定できるのはFlash8からということで、少々困ったことに。
う~ん、角は尖って欲しいんだけどなぁ・・・
ActionScript2には円を描く関数が無い?
今頃にFlash MXを引っ張り出してActionScriptの勉強してます。
図形で円を動的に描こうと思って調べているとdrawCircleなる関数があるという。
しかしよくよく調べていくと、この関数が使えるのはActionScript3からだとか。
わざわざ数式を用意するのと、インスタンスを使うのではどちらが軽いんだろう。
Flash9は高いしなぁ~
Flashでカーソルの座標を得る
Flashを始めました。
JavaScriptで処理するにも、いろいろと限界もありますし、
ActionScriptを利用すれば非常に簡単に実行できることもあったりします。
クロスブラウザを気にしなくていいのが最大の利点でしょうか。
さて、基本となるカーソルの座標取得方法です。
_root.onMouseMove = function(){ trace( _root._xmouse + '/' + _root._ymouse ); }
window.onunloadでハマる
ブラウザの履歴操作をイベントとして捕捉しようと調べていましたが、
ブラウザによってwindow.onunload
の挙動が微妙に違うようです。
ブラウザ | 戻る | 更新 | 進む | 閉じる(タブ) | 閉じる(ウィンドウ) |
---|---|---|---|---|---|
Internet Explorer 7.0 | 〇 | 〇 | 〇 | 〇 | 〇 |
Firefox 2.0 (lolifox0.3.6) |
〇 | 〇 | 〇 | 〇 | 〇 |
Firefox 3.0 | 〇 | 〇 | 〇 | 〇 | 〇 |
Opera 9.51 | × | × | △ (ブラウザの進む機能は無効) |
× | × |
Google Chrome ベータ | 〇 | 〇 | 〇 | 〇 | 〇 |
細かい仕様は確認していませんが、Operaはスクリプターにとってはあまり歓迎されない実装をしているようです。
(※この比較表は、ブラウザの履歴機能と、HTML内のち通常リンクで検証しており、historyオブジェクトによるページ推移は考慮されていません。)
進数の変換
16進数を10進数に、
16進数を8進数に、
10進数を16進数に、
10進数を8進数に、
8進数を10進数に、
8進数を16進数に、
他にもいろいろありますが、コピペを使い続けてきたためか、いざ自前で式を書こうとすると全く書けません。
検索の仕方が悪いのかの、関数があるのを見落としているだけなのか、なかなか見つかりません。
PHPにはbase_convert()がありますが、使い勝手がよろしくない。
my $str = '本日は晴天なり';
my $buf = q{};
$buf .= sprintf( '\%o', $_ ) foreach unpack 'C*', $str;
う~ん、美しい。
PerlでPOSTメソッドの送信を行う
PerlでPOSTする必要があったので調べてみた。
HTTP::Request::CommonでPOSTするデータを用意して、LWP::UserAgentに委ねるだけ。
この連携はいつ使っても感動しますね。
use strict;
use LWP::UserAgent;
use HTTP::Request::Common;
# POST準備
my $url = 'http://exsample.com/receive.cgi';
my %postdata = ( 'id' => 'id', 'pass' => 'pass' );
my $request = POST( $url, \%postdata );
# 送信
my $ua = LWP::UserAgent -> new;
my $res = $ua -> request( $request ) -> as_string;
PostScript::Simpleで楕円を書く
PostScript::Simpleには楕円を描くためのメソッドは用意されていません。
そのため、自力で書く必要があります。
コツは楕円の中心へtranslateして、そこを中心にscaleします。
用意されているcircleメソッドで円を書いて、
scaleを元に戻して、translateも元に戻します。
これで元の座標軸に戻ります。
# 楕円のサイズ my $width = 100; my $height = 50; # 横幅を基準に描画する $ps -> {'pspages'} .= sprintf( "%d %d translate\n", $width, $height ); $ps -> {'pspages'} .= sprintf( "1 %.2f scale\n", $height / $width ); $ps -> circle( 0, 0, $width ); $ps -> {'pspages'} .= sprintf( "1 1 %.2f div scale\n", $height / $width ); $ps -> {'pspages'} .= sprintf( "-%d -%d translate\n", $width, $height );
movetoとの使い分けが難しいですね。
楕円のときだけtranslateなのかな?