/pain/,@p=$`=~/pon/g,print@p>=2?$#p:-1,$/for<>