use strict; open (MYFILE,"<testing.txt")||die "Could not open input file\n"; my @datas = grep /^Hello\s+/, <MYFILE>; my $countline = $#datas + 1; # or just treat $#datas as linecount-1
One world, one people
In reply to Re: help with an array
by anonymized user 468275
in thread help with an array
by cravena
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |