I would like to count the number of regex match and then move onto the
 next iteration in the loop, I'm not able to get this program to work
as intended.

my $cell;
my $count = 0;
my $link;
my @linkCount;

print $file,"\n";

while (my $line = <>) {
  if ($line =~ /HCS\s(\d+)/) {
  $cell = $1;

  if ($line =~ /DL_UPLINK_AVG_THRUPUT,\s\d+/) {
  $count++;
  next;
  }

  push(@linkCount,$count);
  }
}

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to