-- Practice yukicoder
-- author: Leonardone @ NEETSDKASU

main = interact $ show . length . filter (=='W')