useでライブラリを重複呼び出した場合
- 2008.10.24
package abc;use CGI;・・・略package def;use CGI; このようにuseで複数回モジュールを呼び出した場合はどうなるのか? どうやらPerlは内部でuseしたライブラリ名を記憶していて、同じモジュールをuseしない(2回目のuseは無視)ようになっているので、二カ所(またはそれ以上)で同じモジュールをuseしても、全く問題無い。
perl、 MySQL、オープンソース系、ウェブ系ネタ。なぜか鯖管メモがほとんどを占めている…
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 […]