my @number = (); for (my $i = 0; $i < @column_1; $i++) { if (($column_1[$i] >= 8 && $column_1[$i] <= 52) && ($column_2[$i] >= 98 && $column_2[$i] <= 202)) { push @number, join(' ', $column_1[$i], $column_2[$i]); } } foreach (@number) { print $_ . "\n"; }