Dear Masters,
I'm trying to print out a directory name from a method generated by Net::Google
print Dumper $re->directoryCategory(); # which gives $VAR1 = bless( { 'fullViewableName' => 'foo', 'specialEncoding' => '' }, 'DirectoryCategory' );
My problem is how can I print out the value of "fullViewableName" under the value above? I tried this:
foreach my $dc ( %{ $re->directoryCategory() } ) { print $dc->fullViewableName()."\n" ; }
But doesn't work. What's the correct way to do it?
My complete code is here:
use warnings; use strict; use Data::Dumper; use Net::Google; use constant LOCAL_GOOGLE_KEY =>"***********************"; my $service = Net::Google->new( key => LOCAL_GOOGLE_KEY ); my $session = $service->search(); $session->query(qw (beadwork )); $session->starts_at(5); $session->max_results(15); my $responses = $session->response(); #print Dumper $responses ; foreach my $r ( @{$responses} ) { print sprintf( "%s : %s\n", $r->searchQuery(), $r->estimatedTotalResultsCount() ); foreach my $re ( @{ $r->resultElements() } ) { print $re->URL() . "\n"; print Dumper $re->directoryCategory(); foreach my $dc ( %{ $re->directoryCategory() } ) { print $dc->fullViewableName()."\n"; } } }
Update: I tried putting 'keys' before the hash reference as suggested by BerntB, but won't do because this is a blessed hash.

---
neversaint and everlastingly indebted.......

In reply to Accessing a blessed hash reference - Google API by neversaint

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.