$N%$_ or$\+=2-($_*$_==$N)for 1..sqrt($N=<>);print