Home  |  Linux  | Mysql  | PHP  | XML
From:Ignacio J. Ortega Lopera Date:Wed May 30 10:48:53 2007
Subject:package AI::Categorizer::Collection::DBI;
Hola a todos:

When trying to use i've found that DBI try to read categories from database,
it trie to read a second column that seems to contain categories, it uses
something like [$result[1]].., my perl knowledge is a little poor to say the
least.. but it seems to my that code later expects this parameter as an
array of Category objects..

I've done a little change that permits that this second column be a list of
categories separated by commas, code ( can be a diff -u if needed)
attached, maybe it's usefull to anyone..

Thanks for that package, Ken, it's ... wonderful :)..

Saludos, Ignacio J. Ortega
---------------------------------------------------------
Technical Manager
http://www.derecho.com/

Attachment: [text/html]
------=_Part_8617_28972708.1180543733878 Content-Type: application/octet-stream; name=DBI.pm Content-Transfer-Encoding: base64 X-Attachment-Id: f_f2c183ff Content-Disposition: attachment; filename="DBI.pm" cGFja2FnZSBBSTo6Q2F0ZWdvcml6ZXI6OkNvbGxlY3Rpb246OkRCSTsKdXNlIHN0cmljdDsKCnVz ZSBEQkk7CnVzZSBBSTo6Q2F0ZWdvcml6ZXI6OkNvbGxlY3Rpb247CnVzZSBiYXNlIHF3KEFJOjpD YXRlZ29yaXplcjo6Q29sbGVjdGlvbik7Cgp1c2UgUGFyYW1zOjpWYWxpZGF0ZSBxdyg6dHlwZXMp OwoKX19QQUNLQUdFX18tPnZhbGlkX3BhcmFtcwogICgKICAgY29ubmVjdGlvbl9zdHJpbmcgPT4g e3R5cGUgPT4gU0NBTEFSLCBkZWZhdWx0ID0+IHVuZGVmfSwKICAgZGJoID0+IHtpc2EgPT4gJ0RC STo6ZGInLCBkZWZhdWx0ID0+IHVuZGVmfSwKICAgc2VsZWN0X3N0YXRlbWVudCA9PiB7dHlwZSA9 PiBTQ0FMQVIsIGRlZmF1bHQgPT4gIlNFTEVDVCB0ZXh0IEZST00gZG9jdW1lbnRzIn0sCiAgKTsK Cl9fUEFDS0FHRV9fLT5jb250YWluZWRfb2JqZWN0cwogICgKICAgZG9jdW1lbnQgPT4geyBjbGFz cyA9PiAnQUk6OkNhdGVnb3JpemVyOjpEb2N1bWVudCcsCgkJIGRlbGF5ZWQgPT4gMSB9LAogICk7 CgpzdWIgbmV3IHsKICBteSAkY2xhc3MgPSBzaGlmdDsKICBteSAkc2VsZiA9ICRjbGFzcy0+U1VQ RVI6Om5ldyhAXyk7CiAgCiAgZGllICJNdXN0IHByb3ZpZGUgJ2RiaCcgb3IgJ2Nvbm5lY3Rpb25f c3RyaW5nJyBhcmd1bWVudHMiCiAgICB1bmxlc3MgJHNlbGYtPntkYmh9IG9yICRzZWxmLT57Y29u bmVjdGlvbl9zdHJpbmd9OwogIAogIHVubGVzcyAoJHNlbGYtPntkYmh9KSB7CiAgICAkc2VsZi0+ e2RiaH0gPSBEQkktPmNvbm5lY3QoJHNlbGYtPntjb25uZWN0aW9uX3N0cmluZ30sICcnLCAnJywg e1JhaXNlRXJyb3IgPT4gMX0pCiAgICAgIG9yIGRpZSBEQkktPmVycnN0cjsKICAgIGRlbGV0ZSAk c2VsZi0+e2Nvbm5lY3Rpb25fc3RyaW5nfTsKICB9CiAgCiAgJHNlbGYtPnJld2luZDsKICByZXR1 cm4gJHNlbGY7Cn0KCnN1YiBkYmggeyBzaGlmdCgpLT57ZGJofSB9CgpzdWIgcmV3aW5kIHsKICBt eSAkc2VsZiA9IHNoaWZ0OwogIAogIGlmICghJHNlbGYtPntzdGh9KSB7CiAgICAkc2VsZi0+e3N0 aH0gPSAkc2VsZi0+ZGJoLT5wcmVwYXJlKCRzZWxmLT57c2VsZWN0X3N0YXRlbWVudH0pOwogIH0K CiAgaWYgKCRzZWxmLT57c3RofXtBY3RpdmV9KSB7CiAgICAkc2VsZi0+e3N0aH0tPmZpbmlzaDsK ICB9CgogICRzZWxmLT57c3RofS0+ZXhlY3V0ZTsKfQoKc3ViIG5leHQgewogIG15ICRzZWxmID0g c2hpZnQ7CgogIG15IEByZXN1bHQgPSAkc2VsZi0+e3N0aH0tPmZldGNocm93X2FycmF5OwogIHJl dHVybiB1bmRlZiB1bmxlc3MgQHJlc3VsdDsKICBteSBAY2F0ZWdvcmllcyA9IHNwbGl0IC8sLywk cmVzdWx0WzFdOwogIEBjYXRlZ29yaWVzID0gbWFwIEFJOjpDYXRlZ29yaXplcjo6Q2F0ZWdvcnkt PmJ5X25hbWUobmFtZSA9PiAkXyksIEBjYXRlZ29yaWVzOwoKICByZXR1cm4gJHNlbGYtPmNyZWF0 ZV9kZWxheWVkX29iamVjdCgnZG9jdW1lbnQnLAoJCQkJICAgICAgbmFtZSA9PiAkcmVzdWx0WzBd LAoJCQkJICAgICAgY2F0ZWdvcmllcyA9PiBAY2F0ZWdvcmllcywKCQkJCSAgICAgIGNvbnRlbnQg PT4gJHJlc3VsdFsyXSwKCQkJCSAgICAgKTsKfQoKMTsK ------=_Part_8617_28972708.1180543733878--
Navigate in group perl.ai at sever nntp.perl.org
Previous Next




  
© No Copyright
You are free to use Anything
Site Maintained by PHP Developer
Powered By PHP Consultants