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

Re: Handling delimiters

by kennethk (Abbot)
on May 30, 2017 at 19:29 UTC ( [id://1191628]=note: print w/replies, xml ) Need Help??


in reply to Handling delimiters

I'm guessing you are trying to assemble SQL; if this is incorrect, please provide additional context, since knowing what you are trying to pass to what is key to debugging your interface.

If you are using DBI, it's much easier to use placeholders because the interface will handle the escaping. This will also reduce security risks and will make your code more maintainable. Your code might look something like:

my $sql = <<EOSQL; SELECT * FROM G WHERE VAL1 = 'Y' AND G.FEAT_TYPE = ? EOSQL my $query = $dbh->prepare($sql); $query->execute($ftype);
or, if you want something more dynamic,
my $sql = "SELECT * FROM G WHERE VAL1 = 'Y'"; my @args = (); if ($flag) { $sql .= ' AND G.FEAT_TYPE = ?'; push @args, $ftype; } my $query = $dbh->prepare($sql); $query->execute($ftype);

#11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1191628]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others wandering the Monastery: (2)
As of 2024-04-25 22:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found