Using a HOH (Hash-of-hashes) would make this program easier to read and maintain.

The code below is a guess at what you want to do - I have added parameters I feel would be necessary for your DB handling.

use strict; use warnings; my %people; my @sentences = ("here i am","i am me"); # Create $people{me} - it contains a HASH-REFERENCE $people{me} = {ROW=>0, DOB=>1985, SPEAK=>[@sentences], # This element is an array-reference, crea +ted from a copy of the array @sentences }; @sentences = ("there she is"); $people{friend} = {ROW=> 1, DOB=> "1984", SPEAK=>[@sentences] # }; foreach my $person (sort keys %people) # Use the KEYS function to get + hash keys, then sort them { addDOBToDatabase( $people{$person}->{ROW}, $person, $people{$person} +->{DOB}); my $sentenceRow = 0; foreach my $sentence ( @{ $people{$person}->{SPEAK} }) # Walk throug +h each element of the array-reference { $sentenceRow++; addSentenceToDatabase( $sentenceRow, $people{$person}->{ROW}, $ +sentence); } }
You need to understand hashes, and references, to follow this code.

     Theory is when you know something, but it doesn't work.
    Practice is when something works, but you don't know why it works.
    Programmers combine Theory and Practice: Nothing works and they don't know why.         -Anonymous


In reply to Re: Help with Hash or Arrays by NetWallah
in thread Help with Hash or Arrays by Anonymous Monk

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.