retrieve info

bigup401 has asked for the wisdom of the Perl Monks concerning the following question:

i want to search info from db by age,name and country. but i get blank output

if ($input) {
my $search = $DBH->prepare("SELECT * FROM tble WHERE CONCAT(NAME, ', '
+, AGE, ', ', COUNTRY) LIKE ?");
$search->execute($input);

    my $row;
    while (my $row = $search->fetchrow()) {
         print "$row\n";
    }
    
    }
[download]

Comment on retrieve info Download Code

Replies are listed 'Best First'.
Re: retrieve info by huck (Prior) on Sep 11, 2018 at 23:32 UTC
what does $input look like? does it contain a `%`? possibly you might want something like `$search->execute('%'.$input.'%');` SQL LIKE Operator	[reply] [d/l] [select]
Re^2: retrieve info by bigup401 (Pilgrim) on Sep 12, 2018 at 13:48 UTC
thanks	[reply]
Re^3: retrieve info by marto (Cardinal) on Sep 12, 2018 at 13:56 UTC
As part of basic testing/debugging you should always run your the SQL you have in your code against your database using your test data using one of the standard interfaces. For anything complex I develop my SQL code in SQL Developer (oracle specific) to ensure it all works as expected, before embedding it in my perl code.	[reply]
Re: retrieve info by Anonymous Monk on Sep 11, 2018 at 23:17 UTC
show an SSCCE	[reply]