10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hello,
Could someone please suggest if there is a way to pass an perl array(pass @v_array) to SQL as in below eg :
#!/usr/bin/perl
@v_array = (1,2,4,5,6,8);
$db_userid = 'ni71/ni711';
$bufTPO = qx{ sqlplus -s << EOF
$db_userid
set verify off
set feedback off
set... (1 Reply)
Discussion started by: arunshankar.c
1 Replies
2. Shell Programming and Scripting
Hi all,
I am getting an issue in connecting perl with sql server 2005.
I am unsing Padre as an IDE on Strawberry perl.
Please help me about this matter (0 Replies)
Discussion started by: parthmittal2007
0 Replies
3. 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
4. Shell Programming and Scripting
Hi,
I am in the need of doing a bulk insert via :
SQL - INSERT INTO <table> (SELECT..)
OR
PLSQL Block - FORALL i IN 1 .. count INSERT INTO <table>(arrayname(i))
I have a 2D array in my perl code which has the rows to be bulk inserted.
Is there a way to bind the 2D array to the SQL... (4 Replies)
Discussion started by: sinpeak
4 Replies
5. Shell Programming and Scripting
Hello,
If I run this command on the server it works.
# dbc "update config set radio_enabled = 0;"
how can I execute the same command in perl. I have defined the dbc path. Can any one please correct the last line.
#!/usr/bin/perl
#database path
$dbc='/opt/bin/psql -Userver... (0 Replies)
Discussion started by: sureshcisco
0 Replies
6. Shell Programming and Scripting
Hi ,
I used the below script to get the sql data into csv file using unix scripting.
I m getting the output into an output file but the output file is not displayed in a separe columns .
#!/bin/ksh
export FILE_PATH=/maav/home/xyz/abc/
rm $FILE_PATH/sample.csv
sqlplus -s... (2 Replies)
Discussion started by: Nareshp
2 Replies
7. Shell Programming and Scripting
Hi there,
I got this situation at job. First i have a Perl script that connect to Oracle 10g and execute a package. That package execute severals transactions and must generate log about process status each interval of time.
What i'm doing now is saving the plsql package log in an auxiliar... (4 Replies)
Discussion started by: jparra
4 Replies
8. Shell Programming and Scripting
Hi All,
I have the following sql query
select abcd from udbadm.log where xyz='1'.
I have 16k queries similar to this with different values for xyz.
I want to print the values of 'abcd' for each row.
I have the following perl code, but not sure how i can print that particular... (1 Reply)
Discussion started by: userscript
1 Replies
9. UNIX for Dummies Questions & Answers
Hi guys,
I am new on here, I have a function in oracle that returns a specific value:
create or replace
PACKAGE BODY "CTC_ASDGET_SCHED" AS
FUNCTION FN_ASDSCHEDULE_GET
RETURN VARCHAR2
AS
BEGIN
DECLARE
ASDSchedule varchar2(6);
ASDComplete... (1 Reply)
Discussion started by: reptile
1 Replies
10. Shell Programming and Scripting
I the the following perl script, however it does not return anything. Did i form my syantax wrongly?
$sth=$dbh->prepare("select a.rowid,a.* from Table1 a
where a.field1 = \'$Indicator1\'
and a.schedule = \'$Indicator2\' and a.lastdate <= sysdate");
$sth->execute() ... (1 Reply)
Discussion started by: new2ss
1 Replies
Data::Phrasebook::SQL(3pm) User Contributed Perl Documentation Data::Phrasebook::SQL(3pm)
NAME
Data::Phrasebook::SQL - The SQL/DBI Phrasebook Model.
SYNOPSIS
use Data::Phrasebook;
use DBI;
my $dbh = DBI->connect(...);
my $book = Data::Phrasebook->new(
class => 'SQL',
dbh => $dbh,
file => 'queries.txt',
);
my $q = $book->query( 'find_author', {
author => "Lance Parkin"
});
while ( my $row = $q->fetchrow_hashref ) {
print "He wrote $row->{title}
";
}
$q->finish;
queries.txt:
find_author=select title,author from books where author = :author
DESCRIPTION
In order to make use of features like placeholders in DBI in conjunction with phrasebooks, it's helpful to have a phrasebook be somewhat
more aware of how DBI operates. Thus, you get "Data::Phrasebook::SQL".
"Data::Phrasebook::SQL" has knowledge of how DBI works and creates and executes your queries appropriately.
CONSTRUCTOR
new
Not to be accessed directly, but via the parent Data::Phrasebook, by specifying the class as SQL.
Additional arguments to those described in Data::Phrasebook::Generic are:
o "dbh" - a DBI database handle.
METHODS
dbh
Set, or get, the current DBI handle.
query
Constructs a Data::Phrasebook::SQL::Query object from a template. Takes at least one argument, this being the identifier for the query. The
identifier is used as a key into the phrasebook "file". A second argument can be provided, which is an optional hashref of key to value
mappings.
If phrasebook has a YAML source looking much like the following:
---
find_author:
sql: select class,title,author from books where author = :author
You could write:
my $q = $book->query( 'find_author' );
OR
my $q = $book->query( 'find_author', {
author => 'Lance Parkin'
} );
OR
my $author = 'Lance Parkin';
my $q = $book->query( 'find_author', {
author => $author,
} );
# sql = select class,title,author from books where author = ?
# args = 'Lance Parkin'
In the above examples, the parameters are bound to the SQL using the bind parameters functionality. This is more efficient in most cases
where the same SQL is reused with different values for fields.
However, not all SQL statements just need to bind parameters, some may require the ability to replace parameters, such as a field list.
---
find_author:
sql: select :fields from books where author = :author
my $q = $book->query( 'find_author',
replace => { fields => 'class,title,author' },
bind => { author => 'Lance Parkin' }
);
# sql = select class,title,author from books where author = ?
# args = 'Lance Parkin'
In all instances, if the SQL template requested does not exist or has no definition, then an error will be thrown.
Consult Data::Phrasebook::SQL::Query for what you can then do with your returned object.
For reference: the bind hashref argument, if it is given, is given to the query object's "order_args" and then "args" methods.
SEE ALSO
Data::Phrasebook, Data::Phrasebook::Generic, Data::Phrasebook::SQL::Query.
SUPPORT
Please see the README file.
AUTHOR
Original author: Iain Campbell Truskett (16.07.1979 - 29.12.2003)
Maintainer: Barbie <barbie@cpan.org> since January 2004.
for Miss Barbell Productions <http://www.missbarbell.co.uk>.
COPYRIGHT AND LICENSE
Copyright (C) 2003 Iain Truskett.
Copyright (C) 2004-2010 Barbie for Miss Barbell Productions.
This module is free software; you can redistribute it and/or
modify it under the Artistic Licence v2.
perl v5.10.1 2010-08-31 Data::Phrasebook::SQL(3pm)