PerlでPostgreSQL呼出で結果が取得できない

Question

以下のような感じでPerlでPostgreSQLからデータを取得しようとしています。
テスト用の環境ではうまく動いていたのですが、いざ本番用環境に移行すると何故か結果が取得できません。

my $command = 'psql -h 255.255.255.255 -U username -c "select * from test" |';
open( IN, $command )
while( <IN> ) {
　　$result .= $_;
}
close( IN );

テスト環境ではデータが取得できていたので、プログラムの構文的には間違っていないと思うのですが、
PerlやPostgreSQL、サーバー等の環境設定について経験が浅い為、原因がさっぱり分かりません。
なお、２行目のopenには成功しているようですが、whileループ中には入っていないようです。

どのようにして原因の切り分けが出来るでしょうか？
また、解決にはどのようにすれば良いでしょうか？

※補足要求をいただければ、比較的早く補足できると思いますので、
　必要な情報があれば合わせてご指示ください。
※原因の切り分けがちゃんと出来ていないため、カテゴリが違う可能性があります。
　ご容赦ください。

hira6bg · Accepted Answer

やっとわかってきました。
最終的にはブラウザに出力したいのですね。

私の推測では取得できてますね・・・。多分。

先ほどのデバッグライトを少し書き直して見ましょう。

print STDERR "DEBUG::[[$command]]
"
open( IN, $command ) || die "OPEN ERROR!!
";
while( <IN> ) {
　　$result .= $_;
print STDERR "$result
";
}

としてみてください。

CGI実行後、Webサーバ（Apacheかな？）のerror_logにデバッグライトがはかれます。

出力結果を教えて下さい。

また、別のエラーがはかれていた場合も教えてください。

>tail -f error_log

とするとリアルタイムにはかれるログがわかります。

galluda · Answer

どもです。がると申します。
んっと…DBへの接続であれば、可能な限りDBI/DBDをお使いになることを心からお勧めいたします。
上述より若干は面倒かもしれませんが、木目細やかにSQLが扱えますよ。

もし追加でご質問いただければ、DBIの使い方など書き込みできるかと思いますのでお気軽に。

hira6bg · Answer

pg_hba.confのUSER列でユーザが指定されているとパスワードを聞いてきます。

ここをallとするとパスワードを聞いてこなくなります。

尚、pg_hba.confを書き換えた場合PostgreSQLの再起動が必要となります。

hira6bg · Answer

No1です。

OSの情報は下記コマンドでわかります。
> uname -a

０）print "DEBUG::[[$command]]
"の結果はどのように表示されましたか？？

下記の意味がよくわからないのでもう少しわかりやすく説明していただけますか？

>また色々試している中で、発生した現象ですが、
>このSQLコマンドは通常ブラウザからコールされるの
>で、その形でテストしていますが、
>コマンドライン上からこのCGIファイルを実行すると
>（perl test.cgi）
>結果がちゃんと取れました・・

１）テスト環境と本番環境では実行の仕方が違うのですか？？どこからどこに実行したのかを教えてください。
（詳細に！！）

hira6bg · Answer

No1です。

０）せめてにOSやPostgreSQLやPerlのバージョンはわかりませんか？

１）本番環境とテスト環境は別サーバマシンですか？

２）本番環境のPostgreSQLのpostgresql.confで
tcpip_socket = true
となっていますか？

４）どちらの環境でも
********************************************
my $command = 'psql -h 255.255.255.255 -U username -c "select * from test" |';
open( IN, $command )
while( <IN> ) {
　　$result .= $_;
}
close( IN );
********************************************
を実行したのでしょうか？

print "DEBUG::[[$command]]
"
open( IN, $command ) || die "OPEN ERROR!!
";

としてデバッグしたらどうでしょうか？

hira6bg · Answer

テスト環境と本番環境の違いがわかりませんが、
１行目のpsqlコマンドでデータベース名を設定すると取得できませんか？？

my $command = 'psql -h 255.255.255.255 -U username -c "select * from test" データベース名|';

PerlでPostgreSQL呼出で結果が取得できない

やっとわかってきました。

この回答への補足

どもです。

pg_hba.confのUSER列でユーザが指定されているとパスワードを聞いてきます。

この回答への補足

No1です。

この回答への補足

No1です。

この回答への補足

テスト環境と本番環境の違いがわかりませんが、

この回答への補足

似たような質問が見つかりました

関連するカテゴリからQ&Aを探す

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング