1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

Creating a 2D perl array to store data

Discussion in 'Perl' started by teknokid1, Nov 17, 2011.

  1. teknokid1

    teknokid1 New Member

    Joined:
    Nov 9, 2011
    Messages:
    2
    Likes Received:
    0
    Trophy Points:
    0
    Respected All,

    Kindly help me out.

    I have got file listings in a directory like this:

    -rw-r--r-- 1 root root 115149 2011-11-17 07:15 file1.stat.log
    -rw-r--r-- 1 root root 115149 2011-11-18 08:15 file2.stat.log
    -rw-r--r-- 1 root root 115149 2011-11-19 09:15 file3.stat.log
    -rw-r--r-- 1 root root 115149 2011-11-20 10:15 file4.stat.log
    -rw-r--r-- 1 root root 115149 2011-11-21 11:15 file5.stat.log


    I am storing this output in the @data array as mentioned below:

    foreach $_(`ls -lrt *stat*`)
    {
    @data = split " ", $_;
    }


    Now, I want to create a 2D array of 5x3 dimensions, Let's say output[][] in perl, to store the
    desired information.This column of 2D array's output[][] will be filled by @data array's 6th,7th and 8th columns.
    I want to use referances.

    #
    like

    output[][] =
    data[6] data[7] data[8]
    data[6] data[7] data[8]
    data[6] data[7] data[8]
    data[6] data[7] data[8]
    data[6] data[7] data[8]


    The desired info will be

    output[][] =

    2011-11-17 07:15 file1.stat.log
    2011-11-18 08:15 file2.stat.log
    2011-11-19 09:15 file3.stat.log
    2011-11-20 10:15 file4.stat.log
    2011-11-21 11:15 file5.stat.log

    I want to create a function for this and want to return this 2D array output[][] as the result.

    Please help me out.
    I shall be very thankful to you.

    Warm Regards,
    Teknokid1
     

Share This Page