% perl -ne '$sum += /pattern/}{print $sum,$/' file1 file2 file3 #### % perl -lpe '$\+=/pattern/}{$\.=$/' file1 file2 file3