It's not exactly clear what you're asking. First, please see How do I post a question effectively? and, "hey monks": How do I compose an effective node title?

In general terms, however, there are numerous ways to do what you ask. Consider this example:

my @arr = (
  {
    filename => 'foo.txt',
    time     => time(),
    filetype => 'furry',
  },
  { filename => 'readme', time => time(), filetype => 'blue' },
);
[download]

Now @arr contains references to two hashes, each containing the fields you specified (in lowercase, you can use uppercase if you really want to, but most Perl code wouldn't).

To pull together all files of a specific filetype, you can use this sort of construct:

And to print the filenames from that:

Hopefully these very simple examples will be relevant to you, and will help you grasp some of the basics. Please do make good use of perlintro and the other resources here.

We cannot provide a thorough and accurate answer (short of getting lucky in guessing) without knowing more about your data set. Why don't you post the contents of, say, five of the elements in @arr, rather than partially describing the field names.

Be sure to wrap this sample data in code tags so that we can see if there are useful patterns such as fixed-width field sizes.

Also explain how a person looking at the data should differentiate between the fields; are they separated by white space? Are they separated by commas? Are delimiters allowed within the fields too? If so, how does escaping work? Does this data format have a name that we might recognize, or was it produced by a commonly known source (which saves you a little work in describing it)?

We don't know what you're working with unless you tell us, and if we don't know what you're working with, we don't know how to show you to work with it.

I can't be sure of your data since you didn't provide it. Is the code to handle it most like #1, #2, or #3 below?

my @arr1;
while ( <> ) {
    my @arr = split ',', $_;
    ( push @arr1, $arr[0] ) if  $arr[2] eq 'particular';
}
[download]

my @arr1 = grep { @{$_}[2] =~ /particular/ } @arr;
[download]

my @arr1 = grep { %{$_}{'FILETYPE'} eq 'particular' } @arr;
[download]

If you can't answer that, then you'll need to provide your input and desired output.

Problems have solutions. If you can't define a desired state and explain how it is different from the current state then you don't have a problem. You have a gripe. Gripes don't have solutions other than turning them into problems. Note that this doesn't mean that the solutions to all problems are feasible, but stating the problem is a much better start than griping.

Here's something to get you started: ARRAYS OF ARRAYS

If you want help with a specific piece of code, you'll have to post that, along with some sample input and expected output. Please read How do I post a question effectively?

And the winner for the worst titled question on Perlmonks is...

This just in: We have a tie between creating a LINK and Okay! What!?!?!?