Please read Markup in the Monastery as you've just made a mess of my browser window.

I'm pretty sure you don't want an if-elsif-else set here, unless you want to keep at most one value from each line. You also probably mean to have a hash of hashes of hashes structure here in place of what you are doing (perllol). The test you are performing actually checks if an index exists yet, not if the value is the array. The code you want is likely closer to:

while (<FICHEROCFG>) {
    my $datos_cfg = $_;
    my ($var1,$var2,$var3,$var4) = split (",", $datos_cfg);
    $db{$var1}{'Entidad'}{$var2} = 1;
    $db{$var1}{'Agrupacion'}{$var3} = 1;
    $db{$var1}{'Operativa'}{$var4} = 1;
}

[download]

Update: And to answer your updated question, the index of the last element of @array is given by $#array.

In reply to Re: Check if value exists into an array in a hash by kennethk
in thread Check if value exists into an array in a hash by Sombrerero_loco

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.