/C/g{ $n++ } 
END { print qq{Total: $n carbon atoms\n} }