ok, i got the response:
> > and the function always returns somethings like this:
> > HASH(0x81b99c4)HASH(0x81b988c)HASH(0x814fcf4)HASH(0x81b9c34)HASH(0x81b9afc)HASH(0x81a54f8)
It's returning a reference to a hash. You can grab that reference into a scalar:
my $hash_ref = function();
And then access it by de-referencing the reference:
foreach my $key( keys %$hash_ref ) {
print $hash_var->{$key};
}
Or you can de-reference the hash ref when you call function:
my %hash_var = %{ function() };
and access the values of %hash_var as you've written above.
You may like to 'perldoc -f values' to see how to simplify both loops to something
like this:
foreach my $val ( values %$hash_ref ) {
print $val;
}
perlreftut and perlref, both available via perldoc, explain references in more detail.
I'd suggest
starting with perlreftut;
you can skip straight to the section labeled 'Syntax' if the history of references in
perl isn't
interesting to you.
at london.pm.org
--- Oliver Schnarchendorf <[EMAIL PROTECTED]> wrote:
> On Wed, 30 Jun 2004 11:44:53 -0700 (PDT), Rod Za wrote:
> > and the function always returns somethings like this:
> > HASH(0x81b99c4)HASH(0x81b988c)HASH(0x814fcf4)HASH(0x81b9c34)HASH(0x81b9afc)HASH(0x81a54f8)
> >
> > How can i get this results in an human redable mode?
> Hello Rod,
>
> to see what's going on in structured data types I strongly recommend the use
> of DATA::DUMPER.
>
> Just include the module into your source code and when you print the $jobs you
> just change your
> line to the following:
>
> print Dumper( $jobs{$key} );
>
> The statement will print back the data structure with it's keys, instead of
> just giving you the
> data type and it's position in memory. Once you know which data key you want to
> access you can
> try the following:
>
> print $jobs{$key}->{$data_key};
>
> Hope this helps.
>
> /oliver/
>
> --
> "If you believe everything you read, you better not read." -Japanese Proverb
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> <http://learn.perl.org/> <http://learn.perl.org/first-response>
>
>
>
__________________________________
Do you Yahoo!?
Yahoo! Mail - 50x more storage than other providers!
http://promotions.yahoo.com/new_mail
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
