Re^4: How to handel sqlplus error in perl script.

Hi, I tried what you what suggested.. I also tried the below..

 open (WFH1, ">", "${basePath}/QueryResult4.txt");
run '$SQLPLUS \@${basePath}/VoucherQuery4.sql $startdate',  \*WFH1;
[download]

These are not throwing any error but not able to write on the output file.. could you please extend your help? sorry for sounding dumb and confused.. :)

Comment on Re^4: How to handel sqlplus error in perl script. Download Code

Replies are listed 'Best First'.
Re^5: How to handel sqlplus error in perl script. by poj (Abbot) on Dec 26, 2014 at 11:46 UTC
Try `open (WFH1, '>', "${basePath}/QueryResult4.txt") or die "$!"; run "$SQLPLUS \@${basePath}/VoucherQuery4.sql $startdate", undef, \*WF +H1;` [download] See IPC::Run `## Using run() instead of system(): use IPC::Run qw( run timeout ); run \@cmd, \$in, \$out, \$err, timeout( 10 ) or die "cat: $?"` [download] In response to your question here http://stackoverflow.com/questions/27597811/how-to-increase-efficiency-of-perl-script-which-uses-sqlplus, consider using a sub-select query Read more... (700 Bytes) poj	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^5: How to handel sqlplus error in perl script.
by poj (Abbot) on Dec 26, 2014 at 11:46 UTC

open (WFH1, '>', "${basePath}/QueryResult4.txt") or die "$!";
run "$SQLPLUS \@${basePath}/VoucherQuery4.sql $startdate", undef, \*WF
+H1;
[download]

IPC::Run

## Using run() instead of system():
use IPC::Run qw( run timeout );
run \@cmd, \$in, \$out, \$err, timeout( 10 ) or die "cat: $?"
[download]

http://stackoverflow.com/questions/27597811/how-to-increase-efficiency-of-perl-script-which-uses-sqlplus