<>=~pain;print$#{[$`=~/pon/g]}||-1