Weird perl problem - Linux client , Win2k 8.1.7 server

From: Jose Gilberto Torres <jogeedaklown69_at_yahoo.com>
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

Original text of this message