$/=words;put sort {$/[$0+$_]/$/[$_]},1..$0