package S;

use strict;
use warnings;
require Exporter;

@S::ISA = qw(Exporter);
@S::EXPORT = qw($x);

our $x = 1;
1;