04-08-2008
Hello again...
So let me get this straight... You have to do something like....
$sth -> bind_param_in(1,\$messages_id_pkseq.nextval, 12);
$sth -> bind_param_in(2,\$message_text, 256);
$sth -> bind_param_in(3, ..... );
and like that for each of the parameters, then
$sth -> execute(); without parms?
Interesting..... Thanks...
As for perl for Oracle DB work via the DBI (which is I think what you are speaking of here), I have to admit that except for low-volume inserts/updates like summary records, or updating some status-of-a-job record and things like that, I don't use it much either. Something like what you are doing I would only do if the transaction rate is relatively low. Otherwise, you might consider input via sql+ and get the return value by assigning the result of a qx|| call to an array....
So you have a simple sql+ script that takes the VALUES in as parms and in perl you do something like....
(@IO) = qx|sqlplus -s login\/passwd\@DB scripttoexecute parm1 parm2... |;
The in/out parm should end up as $IO[0], etc.
The -s parm SILENCES sql+ so the normal stuff dumped to stdout doesn't end up in @IO, only what you want...
My syntax might be a little off... I'm writing this off-the-cuff as it were, and I'm a little rusty lately...
10 More Discussions You Might Find Interesting
1. UNIX for Advanced & Expert Users
I am trying to install perl-DBD-Oracle-1.16-1.2.rpm on Suse (SLE 9), like
rpm -Uvh perl-DBD-Oracle-1.16-1.2.rpm but I keep getting the following error message
error: Failed dependencies:
libclntsh.so.10.1 is needed by perl-DBD-Oracle-1.16-1.2.el4
libnnz10.so is needed by... (1 Reply)
Discussion started by: hassan1
1 Replies
2. UNIX for Dummies Questions & Answers
Hi friends,
I am new to Perl programming. I have a requirement, using perl I need to connect to Oracle DB and get some records ( on unix environment). I googled and found that we need to use DBD (Database Drivers), DBI (DataBase Interface) to connect to oracle. I tried using " sqlplus... (1 Reply)
Discussion started by: satguyz
1 Replies
3. Programming
hi i am trying to connect to an oracle database using dbi and i get this ::
Driver has not implemented the disconnect_all method. at /opt/perl/lib/site_perl/5.8.0/sun4-solaris/DBI.pm line 575
END failed--call queue aborted.
for all i know, the script was working earlier, but has... (1 Reply)
Discussion started by: poggendroff
1 Replies
4. Shell Programming and Scripting
Hi Friends,
I am having Perl 5 and Oracle 9i. I just wanna to connect Oracle DB & to perform some select query statement.
Could anyone pls let me know.
I've tried below command which i found in some website, But it throws some error.:confused:
Executed:
perl -e 'use DBI; print... (1 Reply)
Discussion started by: Vijayakumarpc
1 Replies
5. Shell Programming and Scripting
Hello All,
I need to now how can I establish connection with oracle database then shutdown abort and then startup, In other words need to implement the following lines to perl script:
export ORACLE_SID=<some user>
${ORACLE_HOME}/bin/sqlplus /nolog
SQL> connect / as sysdba
SQL> shutdown... (2 Replies)
Discussion started by: Alalush
2 Replies
6. Shell Programming and Scripting
I want to use Perl to connect to a remote Oracle DB
I have no oracle installation on my server (and dont plan on installing one) I am using solaris 9 on x86 server.
Is this possible?
I basically want to run some basic sql queries on the remote oracle db which I have access to using perl on my... (0 Replies)
Discussion started by: frustrated1
0 Replies
7. Shell Programming and Scripting
Hi,
#!/usr/bin/perl
my @sid=`cat /etc/oratab|grep -v "^#"|grep -v "*"|grep -v "#"|cut -d: -f1 -s`;
my $log;
my $body="";
my $oraclesid="";
chomp($hostname);
foreach my $oraclesid (@SID){
$body="";
chomp($oraclesid);
$dbname=print ($oraclesid);
print... (2 Replies)
Discussion started by: rocky1954
2 Replies
8. Shell Programming and Scripting
Hi,
we have PERL 64-bit build with Oracle 10g DBD . PERL database connection are working fine. Database upgraded to 11.2 and in PERL documents it says still use 10g DBD to connect to 11.2. when I try some test connections, I am getting this error . Did anyone see this error before .
I set the... (2 Replies)
Discussion started by: talashil
2 Replies
9. Shell Programming and Scripting
Hi,
I am new to perl.How to query oracle database with perl???
Thanks (1 Reply)
Discussion started by: tdev457
1 Replies
10. Shell Programming and Scripting
I've a Centralized Server which can connect to all Oracle Databases.
When I was trying the below code it doesn't work, But tnsping was working fine.
#!D:/perl5/bin/perl.exe
use DBI;
my $dbh = DBI->connect('dbi:Oracle:QBDIWCE', 'IDUSER', 'SECRET123#' ) || die( $DBI::errstr . "\n" ) ;
... (1 Reply)
Discussion started by: ilugopal
1 Replies
LEARN ABOUT DEBIAN
statistics::basic::stddev
Statistics::Basic::StdDev(3pm) User Contributed Perl Documentation Statistics::Basic::StdDev(3pm)
NAME
Statistics::Basic::StdDev - find the standard deviation of a list
SYNOPSIS
Invoke it this way:
my $stddev = stddev(1,2,3);
Or this way:
my $v1 = vector(1,2,3);
my $std = stddev($v1);
And then either query the values or print them like so:
print "The stddev of $v1: $std
";
my $sq = $std->query;
my $s0 = 0+$std;
Create a 20 point "moving" stddev like so:
use Statistics::Basic qw(:all nofill);
my $sth = $dbh->prepare("select col1 from data where something");
my $len = 20;
my $std = stddev()->set_size($len);
$sth->execute or die $dbh->errstr;
$sth->bind_columns( my $val ) or die $dbh->errstr;
while( $sth->fetch ) {
$std->insert( $val );
if( defined( my $s = $std->query ) ) {
print "StdDev: $s
";
}
# This would also work:
# print "StdDev: $s
" $std->query_filled;
}
METHODS
new()
The constructor takes a list of values, a single array ref, or a single Statistics::Basic::Vector as arguments. It returns a
Statistics::Basic::StdDev object.
Note: normally you'd use the mean() constructor, rather than building these by hand using "new()".
query_mean()
Returns the Statistics::Basic::Mean object used in the standard deviation computation.
_OVB::import()
This module also inherits all the overloads and methods from Statistics::Basic::_OneVectorBase.
OVERLOADS
This object is overloaded. It tries to return an appropriate string for the calculation or the value of the computation in numeric
context.
In boolean context, this object is always true (even when empty).
AUTHOR
Paul Miller "<jettero@cpan.org>"
I am using this software in my own projects... If you find bugs, please please please let me know. :) Actually, let me know if you find it
handy at all. Half the fun of releasing this stuff is knowing that people use it.
COPYRIGHT
Copyright 2012 Paul Miller -- Licensed under the LGPL
SEE ALSO
perl(1), Statistics::Basic, Statistics::Basic::_OneVectorBase, Statistics::Basic::Vector
perl v5.14.2 2012-01-23 Statistics::Basic::StdDev(3pm)