Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re: printing out hash

by graff (Chancellor)
on Nov 09, 2007 at 02:32 UTC ( [id://649846]=note: print w/replies, xml ) Need Help??


in reply to printing out hash

I think it will help if you add use strict; -- in particular, when you do that, and add "my" where necessary, you will find that you misspelled the name of your hash in the while() loop condition:
while (my ($home, $topics)=each(%topics)){ # should be %ttopics
Also, you have this funny thing in the "tHelp" sub:
sub tHelp {\%ttopics my $startpoint=$target;
What is "\%ttopics" doing there? Even if that isn't a syntax error, I can't imagine what it's supposed to do, and I expect it is a mistake. Actually, the tHelp sub as a whole makes no sense. What is that sub supposed to do? Where is it called from? Should you perhaps be providing some parameters when you call it? --e.g.:
# some where in the part that calls tHelp: tHelp( $param1, \@array ); # or whatever... # in tHelp itself: sub tHelp { my ( $param, $aref ) = @_; ... }

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://649846]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others taking refuge in the Monastery: (6)
As of 2024-03-28 23:32 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found