sort() で使われるから例外扱い
perlvar嫁