<>=~$";$a=$'-$`;<>=~$";$a*=$'-$`;print!$a&&Same||(($a>0&&"Non-r"||R),otating);