Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re: DBI Substring index query and passing value

by Anonymous Monk
on Dec 11, 2012 at 09:29 UTC ( #1008249=note: print w/replies, xml ) Need Help??

in reply to DBI Substring index query and passing value

And what does your query produce when run straight against the database with an SQL command prompt?

How many records are there in the database that begin with '$name'? Does fetchrow_array return false? (If so, your resultset is zero rows.)

Also, I'm quite confused by the query. Do you have fields that are named $$$? (Double quotes are meant to quote table and field names in the SQL dialects I'm familiar with.)

Perhaps you mean:

my $sql = sprintf("... where CustomField = ? and Name like %s", $dbh-> +quote($name . '%')); $agent1 = $dbh->prepare($sql) || die $DBI::errstr; $Agent1->execute(291) || die $DBI::errstr ; ( $phone_no,$mail )= $Agent1->fetchrow_array or die "no results :(";

May I recommend you put RaiseError into your connection string? Less explicit dying.

Replies are listed 'Best First'.
Re^2: DBI Substring index query and passing value
by SriniK (Beadle) on Dec 11, 2012 at 10:41 UTC
    Thanks for your replay.

    $name will be like "Christin". the Direct result in sql will be
    phone_no Mail_ID +00 00 0000 0000 ********.*****@******.com
    In that query the actual result will be +00 00 0000 0000$$********.*****@******.com$$$******, in that im splitting the required phone no and mail id using sub string in sql

    hope you understand.
    The result is there in SQL. But while running in perl it not showing result must be some special charcter issue.
    I tried various methods but not able to get the answer. As of now i have changed the query and splitting done in script.

      $name will be like "Christin".

      Well, currently, $name is $name; single quotes don't interpolate. Do check how I modified your query code. (Also worth looking is 7548)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1008249]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (8)
As of 2018-06-19 09:46 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (113 votes). Check out past polls.