[mv] SQL problem

[Richard Russo <richardr@dgx.net>]

I'm trying to get the return from a SQL query into a array (actually an
array of arrays, but whatever)

from
http://www.minivend.com/minivend/docindex/08.03.SQL_Access_Methods.html
i get the idea that i can do this:

 [perl interpolate=1]

         my $string =<<'EOF';
      [sql array]select * from arbitrary where code <= '19'[/sql
arbitrary]

      EOF
         my $ary = eval $string;
         my $out = '';
         my $i;
         foreach $i (@$ary) {
             $out .= $i->[0];
             $out .= "<BR>";
         }
         $out;

      [/perl]

and substituting my query in there

but when i do that, it doesn't work (the rest of the page loads though)
and i get this in my error log (along with a listing of some of the perl
code, including the results from the sql query)

192.168.2.14 oYB6MbrP:192.168.2.14 - [16/October/1999:16:00:20 -0700]
sqlcat /cg
i-bin/sqlcat/addtoproducts.html Safe: eval string trapped by operation
mask at (
eval 157) line 6.



Richard Russo
DGX InterNET