for$m(@a=2..$<){map$$_+=$-=($x=${$_+$m})&&$x+1-$$_,grep($m%$_<1,@a)<2&&-2e4..-$m}print${-<>}||-1