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>


Reply via email to