Maybe I've just missed a known bug, but this seems kinda odd...

The code below is running againsed Oracle-9.2.0.4 on RHE-3.0.
Called with the same variable interpolated and as a placeholder
it works or doesn't. I have any amount of code floating around
here that uses placeholders and DOES work...

Any suggesions?

$ perl example;

        DBI Version: 1.43

        DBD Version: 1.15

        Value is: 'Q8R2H7'

        Result A: '133387'

        Result B: ''

$ cat example;

use DBI;
use DBD::Oracle;

use Data::Dumper;

print "\n\tDBI Version: $DBI::VERSION\n";
print "\n\tDBD Version: $DBD::Oracle::VERSION\n";

my @connect_args =
(
        "dbi:Oracle:host=$ENV{ORACLE_HOST};sid=$ENV{ORACLE_SID}",
        $ENV{ORACLE_USER},
        $ENV{ORACLE_PASS},
        {
                RaiseError => 1
        }
);

my $dbh = DBI->connect( @connect_args );

my $value = 'Q8R2H7';

print "\n\tValue is: '$value'\n";

my $a =
qq{
        select entry_id
        from entry
        where  entry_accno = '$value'
};

my $b =
q{
        select entry_id
        from entry
        where  entry_accno = ?
};

{
        # this works...

        my $handle_a = $dbh->prepare( $a );

        $handle_a->execute;

        my @row = $handle_a->fetchrow_array;

        print "\n\tResult A: '@row'\n";
}

{
        # this doesn't

        my $handle_b = $dbh->prepare( $b );

        $handle_b->execute( $value );

        my @row = $handle_b->fetchrow_array;

        print "\n\tResult B: '@row'\n";
}




-- Steven Lembark 9 Music Square South, Box 344 Workhorse Computing Nashville, TN 37203 [EMAIL PROTECTED] 1 888 359 3508

Reply via email to