artist

Hi. If you see carefully the internal foreach loop contains $zip_file which comes from the external foreach loop.

'twould be a lot easier for him to see if you would indent your code properly, e.g.,

foreach $zip_file (@zip_files){
    open ZIPS, "unzip -l $zip_file|";
    while(<ZIPS>){
      push @text_files,$1 if /(\d+.out)$/;
    }
    foreach $text_file (@text_files){
       open IN, "unzip -p $zip_file $text_file|";
       my (@required_data) = process_file(\*IN);
    }
}
[download]

Then you can actually see what's internal or external to what.

BTW, I really have to wonder what the purpose of posting this is. It's too specific to serve a general purpose and too general to serve a specific purpose. There are thousands of people with thousands of snippets they could post, but we'd be in trouble if they all did (you might want to google "categorical imperative" for a more general philosophical treatment of this problem). I'd stick with things that might be helpful to a large number of people and that are in some way novel.

Edit by tye, replace PRE with BLOCKQUOTE