in reply to Re: find a string a certain number of times
in thread find a string a certain number of times

while (<FILE>){ push @array, $_; }

[download]
is generally written 
@array = <FILE>;

[download]
Caution: Contents may have been coded under pressure.

In Section Seekers of Perl Wisdom