Perl・DBIでの汎用selectサブルーチンを作成するには? - OKWAVEPerl・DBIで、select文発行のサブルーチンを作成していますが、未熟なため、完成できません。 呼び出し側では、下の記述のように、サブルーチンの引数として、SQL文を渡し（SELECT系）、戻り値として、SELECTされた結果を取得したい（配列もしくは、ハッシュで）と思っております。 もし、参考にできる、サイト・ サンプルサイト等のご紹介でも、結構ですので、ご教授くださればと思います。（処理の流れ等の箇条書きでもかまいません。） -------------------------------------------- # 呼び出し側（メインルーチン） $name;#テンプレート置換変数 $age; #テンプレート置換変数 my $sql =<<"EOQ"; # この抽出select文はその都度変わる。 select NAME,AGE from EMP EOQ my @row = &d
