$_=([R-] get.words)xx get;say [$!=.[0],-1][.Set>1||$! <1]