Help for this page
$ cat 1176022.txt The foo bar ... What the foo Expecting five foos $
$ perl -nE '$l++; $i += () = $_ =~ /\bfoo\b/g; say "After line $l: $i" +' 1176022.txt After line 1: 1 ... After line 6: 5 After line 7: 5 $