There's more than one way to do things | |
PerlMonks |
Re^2: Please help..by starbolin (Hermit) |
on Apr 15, 2008 at 17:34 UTC ( [id://680588]=note: print w/replies, xml ) | Need Help?? |
OOPs! I misquoted fetchall the quote was from fetchrow. Bad, Bad starbolin. But, now I notice that you do not use the value returned from fetchall. How come? I would expect to see something like print @{$row} where $row is dereferenced back to an array or foreach @{$row} { do-something-with-$_ } to loop over the data in the array referenced by $row. Do you understand references? Do these statements make sense? If not, perhaps a read of perlreftut is in order.
s//----->\t/;$~="JAPH";s//\r<$~~/;{s|~$~-|-~$~|||s |-$~~|$~~-|||s,<$~~,<~$~,,s,~$~>,$~~>,, $|=1,select$,,$,,$,,1e-1;print;redo}
In Section
Seekers of Perl Wisdom
|
|