foreach my $aref ( \@array1, \@array2, ... \@arrayn ) {... #### use File::Slurp 'read_file'; my @raw_files; foreach my $filename ( @filenames ) { push @raw_files, scalar read_file( $filename, chomp => 1 ); }