Perl初心者です。
PerlでOracleに接続し、結果をCSVを出力したいのですが
下記プログラムだとなにも出力されません。
Oracle10g
OS:Linux
***
#!/user/bin/perl
#
#
# DBI モジュールの読み込み
use DBI;
#接続
my $hDb = DBI->connect("dbi:Oracle:dbname", "user/pass") or die "CONNECT ERROR $DBI::errstr";
#SELECT
#
$hSt = $hDb->prepare("SELECT ID,NAME FROM MASTER");
open(OUT, ">data.dat");
#実行
$nRes = $hSt->execute;
#データの取得
while($raRes = $hSt->fetchrow_arrayref) {
print OUT join(",", @$raRes), "\n";
}
# ファイルクローズ
close(OUT);
$hSt->finish;
$hDb->disconnect;
A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
ANo.1です。
>書き込みオープンのチェックはどのようにしたらできるのでしょうか?
最初に確認しておけばよかったのですが「何も出力されない」というのはdata.datがサイズ0で作成されるのでしょうか?それともdata.datの作成がされないのでしょうか?open(OUT, ">data.dat"); でも返り値がfalseの場合、エラーメッセージを出力させてみてください(or dieでいいです)。
No.2
- 回答日時:
> print join(",", @$raRes), "\n";
>とすると画面出力できているので出力に失敗していると思います。
とのことですけど、
>open(OUT, ">data.dat");
データベースへの接続はチェックしているのにこの書き込みオープンを
チェックしていませんが、本当に書き込みオープンできてますか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- CGI perlで書いたcgiでsqliteの使い方を教えてください 2 2023/05/08 21:29
- CGI htmlからパラメータで、cgiに渡したい。 1 2023/02/06 16:15
- Excel(エクセル) PHPプログラムをエクセルに張り付けると検索ボックスがでてくる! 3 2022/05/08 07:10
- MySQL 参考書に従って入力したつもりでしたが、最後はエラーがでました。 1 2022/09/28 03:45
- PHP if(preg_match("/[^0-9]/",$gu_d)){意味を教えてください。 1 2022/05/06 05:37
- PHP htmlspecialcharsが機能していないです。 バグですか? 1 2022/04/05 01:22
- MySQL php テーブルを作れない 2 2022/11/17 18:22
- PHP php テーブルが作成できない 1 2022/11/17 23:41
- PHP 【PHP/MySQL】コード上で生成したクエリを基に集計クエリを作りたい 1 2022/07/28 15:06
- Oracle 質問です。 下記のテーブルとデータがあり、 取得想定結果のように出力したいです。 下記のsqlだと0 2 2023/05/23 19:10
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルVBAで素数だけを出力す...
-
ファイル出力の改行コードをLFに
-
ドメインからIPアドレスあるい...
-
python リスト
-
requireで同じライブラリを複数...
-
コマンドプロンプトからperlを...
-
batファイルでrenameができませ...
-
fgets で値が取得できない
-
実行されない
-
fopen64について
-
CSV出力に関して
-
ファイルのアップロード
-
動かなくなったのでJavaソース...
-
Firefox で file:// で始まる U...
-
ファイル全てを .xlsm に変更し...
-
perlでIEのクッキーを削除したい
-
FTP接続時失敗時、接続先名をcs...
-
FindFirstFileとFindNextFileで...
-
csvファイル改行コードの置換に...
-
Rubyでフォルダ内にあるファイ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
awkスクリプトでダブルクォーテ...
-
エクセルVBAで素数だけを出力す...
-
sprintfについて
-
教えて!perlから.exeファイル...
-
重複するデータを抽出できる秀...
-
log2の「正確な」計算方法
-
DOSコマンドで、標準出力を出力...
-
文字コードの変換(Shift-JISか...
-
至急お願いします。C言語で.img...
-
perlでの文字列抽出
-
ダイアモンド演算子<>に対するb...
-
コマンドプロンプトで行が見え...
-
Perlで着メロDLカウント
-
perlのpushについてです。
-
htmlから、ファイル、もしくはC...
-
MAC OSXのTerminalにperlの出力...
-
MySQLに画像を格納してperlで取...
-
ドメインからIPアドレスあるい...
-
CGIから外部コマンド実行時の標...
-
perlでcsvの指定フィールドに書...
おすすめ情報