my( $x_lo, $x_hi ) = ( -180, -170 );
my( $y_lo, $y_hi ) = ( -130, -120 );

my $count = 0;

while (<>) {
  my( $x, $y ) = split;
  if ( $x >= $x_lo
    && $x <= $x_hi
    && $y >= $y_lo
    && $y <= $y_hi ) {
      $count++;
  }
}

print "$count matches.\n";