snappybo has asked for the wisdom of the Perl Monks concerning the following question:
Yes i know evey one says don't do this...
But i just want to know how i can get this to work..
($db->FetchRow()); @names = $db->FieldNames(); @values = $db->Data(); $arraycnt = '0'; while ($names[$arraycnt] ne '') { $$names[$arraycnt] = $values[$arraycnt]; $arraycnt = $arraycnt +1; }
I don't need to know about hashes or arrays, this is the best way to get a result i require without having to recode huge amounts.. Because the code has already been written, just modifcations are being made..
Thanks in advance..
Code tags and formatting added by davido.
Back to
Seekers of Perl Wisdom