Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re^3: Accessing this array ref.

by Cristoforo (Deacon)
on Apr 03, 2013 at 19:52 UTC ( #1026897=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Accessing this array ref.
in thread Accessing this array ref.

I don't understand your question. If the data is sorted as Loops said, his solution should work for you.


Comment on Re^3: Accessing this array ref.
Re^4: Accessing this array ref.
by Anonymous Monk on Apr 03, 2013 at 20:05 UTC
    I am sorry, is that at the end of processing I have to pass the values as this:
    $template->param('data', $results);
      my $results; my $type; for my $entry (@$VAR1) { if ( $entry->{type} ne $type ) { $type = $entry->{type}; push @$results, "$type\n"; } push @$results, "\t$entry->{name} - $entry->{reference}\n"; }
      Then this should do it.
        That was my post above and it occurred to me that you probably want $results as a string to be printed in a web page. If so, I might suggest something like this.
        my $results = "Results: "; my $type; for my $entry (@$VAR1) { if ( $entry->{type} ne $type ) { $type = $entry->{type}; $results .= "$type<br />"; } $results .= "&nbsp;&nbsp;&nbsp;$entry->{name} - $entry->{refer +ence}<br />"; }

        Update: Now that I've thought about it, it seems you are using HTML::Template or something like it to display your data. And I'm not familiar with that but you probably do want to pass it a structure and not a string.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (14)
As of 2014-07-25 18:34 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (174 votes), past polls