Special package variables when using sort(), see "sort" in perlfunc. Because of this specialness $a and $b don't need to be declared (using use vars, or our()) even when using the strict 'vars' pragma. Don't lexicalize them with my $a or my $b if you want to be able to use them in the sort() comparison block or function.

sort() ���篏帥����������勛�号����������宴�若�後����違�с��; "sort" in perlfunc ��� �����с����⓾�������������� �����勛�号����с�˨��������$a ��� $b ��壔����������� strict 'vars' �����í�違����� 篏帥�c�⓾�������������с�� (use vars ��� our() ���篏帥�c��) 絎h��������綽�荀���� ��������障�������� ��������� sort() 罸�莠������㏍����壔����∽�違�т戎��������������˨����������翫����壔�� my $a ��� my $b ��������⓾�㋘�㏍�激�˨����������ŝ����с��������������