In the code below, I have @some_array
which is an array of arrays which contains text like name. So
@some_array= ([sam, jon, july],[Mike, Han,Tommy],[angie, sita, lanny]);
Now when I query the list like sam jon july
first and mike han tommy
. Only the execute return the result from the first list others is undef. I don't know why any help will be appreciated.
If I switch the second to first place and run it it will show the first one only. So the problem is it is returning for the first set but for subsequent sets its returning undef. I did enable strict and warnings but it it didn't show any error.
my $pointer;
my $db = $db->prepare_cached("
begin
:pointer := myFun(:A1);
end;
") or die "Couldn't prepare stat: " . $db->errstr;
$db->bind_param_inout(":pointer", \$pointer, 0, { ora_type => ORA_RSET });
for (my $i = 0; $i < @some_array; $i++) {
my @firstarray = @{$some_array[$i]};
my $sql = lc(join(" ", @firstarray));
print "<pre>$sql</pre>\n";
$db->bind_param(":A1", $sql);
$db->execute();
print "<pre>".Dumper($db->execute())."</pre>\n";
}