use strict;
use warnings;

use S;

print $S::x;
print "\n";