print 'f $ d d i $ n' =~ tr/$ndiff/$ndiff/;   # 7