Thanks. That last bit of help was what I needed. I do have warnings and strict turned on btw. Never leave home without it.

This syntax was a little tricky, but I now see how to build and retrieve HoH's. Thanks so much.

For the sake of completeness, I'll post my final snippet of code here just incase someone else needs similar help.

$i = 0;

while (@rray = $sth -> fetchrow_array) {
    $record = "record_$i";
    $hash{$record} = {uid => $rray[0], fname => $rray[1], lname => $rr
+ay[2]};
    #print $hash{$record} -> {uid}, qq/ /, $hash{$record} -> {fname}, 
+qq/ /, $hash{$record} -> {lname}, qq/\n/;
    $i += 1;
}

my ($key, $value);

for ($i = 0; $i < 325; $i++) {
    $record = "record_$i";
    $key = keys %hash;
    $value = $hash{$record} -> {fname};
    print "key = record_$key, hash values = ", $hash{$record} -> {uid}
+, ", ", $hash{$record} -> {fname}, ", ", $hash{$record} -> {lname}, "
+\n";
}

[download]

Now its time to take this HoH to TT2 and see if I can get my template to render it in the browser.

BTW, I stumbled across an interesting Perl Module while working on this. See CG::Expand (it was new for me).

Cheers

Edited 6/26/10 @ 5:55 PM CST

Sorry, I should've cleaned up that last block of code a bit before pasting it. Here is the edited version:

# get number of records in %hash
my $href = \%hash;
my $records = scalar keys %$href;

# print data from all records
for ($i = 0; $i < $records; $i++) {
    $record = "record_$i";
    print "key = $record, hash values = ", $hash{$record} -> {uid}, ",
+ ", $hash{$record} -> {fname}, ", ", $hash{$record} -> {lname}, "\n";
}

[download]

In reply to Re^8: Best way to send records to the browser? by Perobl
in thread Best way to send records to the browser? by Perobl

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.