Andrew Gaffney <[EMAIL PROTECTED]> wrtoe:
: foreach (keys %$tabledesc) {
: foreach (keys %$tabledesc->{$_}) {
Shouldn't that be:
foreach ( keys %{ $tabledesc->{$_} } ) {
: print "$_ = $tabledesc->{$_}, ";
: }
: print "\n";
: }
BTW, it's confusing to use nested loops
which both use the default value ($_). You would
probably be better off with named values or just
not using two loops.
use Data::Dumper 'Dumper';
print Dumper $tabledesc;
HTH,
Charles K. Clarkson
--
Mobile Homes Specialist
254 968-8328
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
