$/=words;say $2+1-max 1,[R-] $/