[ic] SQL inside UserTags

[Andy Mayer]

Sorry to reply to my own post, but I finally found the answer after much
googling, at the following url:

http://developer.akopia.com/archive/interchange-users/2001/msg04447.html

Which says:

sub {
   my $return = "";
   my $sql = "select price from products";
   my ($results,$colname_hashref,$colname_arrayref) = $Tag->query({
wantarray => 1,sql => $sql, } );
   my @results = @{$results};
   foreach my $ref (@results) {
      my @tmp = @{$ref}; #dereference each arrayref
      foreach my $test (@tmp) { 
         $return .= "$test\n";
      }
   }
   return $return;

}
EOR

If anybody has some better ways of doing it, please speak up!

Cheers,

Andy

-- 
Andy Mayer
West Royd
127 Manchester Road
Sheffield S10 5DN
United Kingdom
--
t: +44 (0) 114 2631336
m: +44 (0) 7976 717210
e: info@andymayer.net
w: www.andymayer.net
--