Weird perl problem - Linux client , Win2k 8.1.7 server
Date: Thu, 08 Mar 2001 17:21:32 -0800
Message-ID: <3AA8301C.CAD16C41_at_yahoo.com>
Hello,
I have this strange problem with my perl code. I set up a win2k 8.1.7
server and have a linux perl client using DBD::Oracle. When I attempt
to query my return values come up blank but returns the correct number
of rows. This piece of code worked when the perl code ran under
windows. I am able to modify data remotely (add tables, values etc)
from the linux side and able to see the data using sql-plus on the
windows server, but I can't query. Is there a permission thing or
something? Here is a snippet of the code. The lists "timearray" holds
a unix time value to query on. Please don't flame me if I put this
question in the wrong newgroup. Thanks!!!!!
Jose
# Build the UNIX date string.
for ($loop = 0; $loop <25 ;$loop++)
{
push _at_timearray,timegm(0,0,$loop,$day,$month,$year);
if ($loop == 0)
{
push _at_temp,"Midnight";
}
else
{
push _at_temp,$loop.":00";
}
}
my $sth = query($db,"SELECT DISTINCT MEDIABRIDGE FROM MB WHERE SNAPSHOT
>= ".
_at_timearray[0]." AND SNAPSHOT <= "._at_timearray[24]);
while (my $x = $sth->fetchrow_array)
{
push _at_server_list, $x;
}
sub query($pointer,$command)
{
# $pointer = $params[0];
# $command = $params[1];
my _at_params = @_;
my $command = $params[0]->prepare($params[1])
or die "Couldn't prepare statement: $DBI::errstr; stopped";
$command->execute()
or die "Couldn't execute statement: $DBI::errstr; stop";
return $command;
}
Received on Fri Mar 09 2001 - 02:21:32 CET