$a
$b

在使用 sort() 时，这些是特殊的包变量，请参阅 perlfunc 中的 "sort"。由于这种特殊性，即使使用 strict 'vars' 编译指示，$a 和 $b 也不需要声明（使用 use vars 或 our()）。如果你想在 sort() 比较块或函数中使用它们，不要用 my $a 或 my $b 对它们进行词法化。