Hello,

I had a simple array in mind, but as i got reacquainted with PERL, with the
help of the list, i realized i was thinking to small.  (that's always
dangerous)

Anyway.  I have an array/hash(still learning the technical differences)
similar to

      (pardon syntax irregularities, just trying to show structure)

[PROCCESSID]
      {DATESTRING}
            {MSGNUMBER} = MSGTEXT
            {MSGNUMBER} = MSGTEXT
            {MSGNUMBER} = MSGTEXT
            {MSGNUMBER} = MSGTEXT
      {DATESTRING}
            {MSGNUMBER} = MSGTEXT
            {MSGNUMBER} = MSGTEXT
            {MSGNUMBER} = MSGTEXT
            {MSGNUMBER} = MSGTEXT

Which I'm having no problems working with.  I wanted to add a SERVERNAME
above PROCESSID so it becomes:

[SERVERNAME]
      [PROCCESSID]
            {DATESTRING}
                  {MSGNUMBER} = MSGTEXT
                  {MSGNUMBER} = MSGTEXT
                  {MSGNUMBER} = MSGTEXT
                  {MSGNUMBER} = MSGTEXT
      [PROCCESSID]
            {DATESTRING}
                  {MSGNUMBER} = MSGTEXT
                  {MSGNUMBER} = MSGTEXT
                  {MSGNUMBER} = MSGTEXT
                  {MSGNUMBER} = MSGTEXT
[SERVERNAME]
      [PROCCESSID]
            {DATESTRING}
                  {MSGNUMBER} = MSGTEXT
                  {MSGNUMBER} = MSGTEXT
                  {MSGNUMBER} = MSGTEXT
                  {MSGNUMBER} = MSGTEXT


...etc.

I'm confused about how to get the count, and keys for the second array.
For the first i was simply using
$cnt = keys %tux_errors;
and
@tux_keys = keys %tux_errors;

when i added an additional key, i thought i could use the following (i was
wrong, of course)

$cnt = keys %tux_errors{SERVERNAME};
and
@tux_keys = keys %tux_errors{SERVERNAME};

When i try the above, i get compilation errors....

I'm sure if found a very difficult way to ask a simple syntax
question...but hey, this is [EMAIL PROTECTED]

Thanks
Jeff




-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to