小编use*_*331的帖子

考虑以下 Perl 代码：

use strict;
use warnings;
use feature qw(say);

package A;
our $x = 1;

package B;
our $x = 2;

package A;
say $x;

package B;
say $x;

输出是：

2
2

然而，我本来期望：

1
2

为什么$xafterpackage A指的$B::x是而不是$A::x？