問題タブ [class-dbi]

DB::CDBIアプリケーションでデータベースにアクセスするためにクラスを使用しています。私たちのプロジェクトはオブジェクト指向の Perl です。

そのようなシナリオの 1 つで、テーブルに行が存在するかどうかを確認することになっています。CDBI呼び出しで組み込みの検索 API を使用しています。

$translation_exists_r_not検索で指定された入力に応じて期待値を取得しています。行が存在する場合、_dataは行の詳細で更新されます。

行が存在しない場合、次のような戻り値が返されます。

検索結果に応じて、translationこのサブからの値を返したいです。find_translationこれではベストコンディションが取れません。

を配列にコピーしようとし_dataましたが、さらに先に進む方法がわかりません。_data空の配列参照と別の条件になるため、配列参照内にハッシュ参照が含まれます。

Perl の Class::DBI を使用してリレーショナル データベースをラップする、ここ数年かけて開発したクラス ライブラリがあります (Prestashop の DB スキームは重要ではありません)。

単一の perl スクリプトで、このクラスの複数の「インスタンス」を作成し、異なるデータベースを指すことを知っている人はいますか? たとえば、今私は次のようなことをします:

すべてがうまく機能します。

私がやろうとしているのは、基本的MyClassLibに、別のデータベースを指す別の「インスタンス」を使用できるようにするエイリアスです。Class::DBIデータベース接続を静的状態として保存するのは面倒です。

擬似コードでこのようなもの

そして、コードアクセスMyClassLibからMyClassLibAlias. Class::DBI私はレガシーであることを認識しており、DBIx::Class存在しない場合は使用するソリューションも高く評価されますClass::DBI

ありがとう

Pets という名前の次のテーブルがあります。

サーバー mydbserver 上の MySQL データベースで、ユーザーが「user」、パスワードが「password」。

以下をせよ：

1)Class::DBI上記のクレデンシャル ( DBI.pm ) を使用して、このデータベースへの接続を作成します。

2) テーブル Pets ( Pet.pm ) のクラスを作成します。

3) Pets テーブルにあるすべての人々の名前と、その人が名前と年齢で並べ替えたペットの種類 (存在する場合) を出力するプログラムを作成します。

これが私が書いたコードです.....