my $count_effs = $paragraph =~ tr/f//;