object method "fetchrow_array"

[Gajjala, Bhushan]

I am getting this error. What am I doing wrong ??


BEFORE:  error=999    return=TEST
AFTER: error=999 STH2= DBI::ProxyServer::st=HASH(0x28a420)
AFTER: STH1= DBI::db=HASH(0x1ca124)
Can't locate object method "fetchrow_array" via package
"DBI::ProxyServer::st" a
t ./test.pl line 42.

---------------------------------------------------------------------

 my $sth = $sth1->prepare( q{ BEGIN
        ? := f_get_subcomponent_info( ?, ?, ?, ? );
        END; } ) or die "Cannot prepare statement";

my $err=999;
my $sth2 = "TEST";


$sth->bind_param_inout(1, \$sth2,0, {ora_type => ORA_RSET});
$sth->bind_param(2,'');
$sth->bind_param(3,'');
$sth->bind_param(4,'6164');
$sth->bind_param_inout(5, \$err,100);

print "BEFORE:  error=$err    return=$sth2\n";

$sth->execute();

print "AFTER: error=$err STH2= $sth2 \n";
print "AFTER: STH1= $sth1 \n";

my @abc = "This is a test";
@abc = $sth2->fetchrow_array;