It is difficult to read your code the way you posted it. It will be much better if you surround your code in <code> tags when you post it. In the editor window it should look like this:

<code>
Your code here
</code>

[download]

Please do read Markup in the Monastery for more on this and other tags that you can use to format your posts. If your posts are better, you will get better responses.

If I understand your question correctly, the following should help...

#!/usr/bin/perl
use warnings;
use strict;
use Data::Dumper;

my @err_loan_id;
my @cad_err_list;

foreach my $file (@cad_err_list) {
    chomp($file);
    my $err_loan_id1 = `grep 'DataDictionary' $file`;
    my @err_loan_id2 = split( /<pciOFACViolation>/, $err_loan_id1 );
    my $reqd_1       = $err_loan_id2[0];
    my @err_loan_id3 = split( /\s/, $reqd_1 );
    my $reqd_2       = $err_loan_id3[2];
    push(@err_loan_id, [ split( />/, $reqd_2 ) ] );
}

print Dumper(\@err_loan_id);

[download]

Note that I have used strict and warnings. You should add this to all your scripts - it will help you find many common bugs in your program. You can read Use strict and warnings to learn more about these very helpful options.

I have changed the last line in your loop to push an anonymous array into the array @err_loan_id. This produces an Array of Arrays. Each element in the array @err_loan_id is a reference to an array containing the results of the final split(). When the loop is done you can access all your results.

If this is new to you (I am guessing it is) then you should read perldata and perllol and perlref to understand how to create and access these more complex data structures. They are great and once you learn how to use them you will really appreciate them.

I have added a print statement after the loop to print the data structure that is created in the loop. I have done this using Data::Dumper. This is a very helpful module for learning about complex data structures.

update: fixed typo: s/err_load_id/err_loan_id/

In reply to Re: appending multiple values in an array by ig
in thread appending multiple values in an array by raghu_shekar

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.