use strict;
use warnings;

use Test::More 'no_plan';

BEGIN {
  package X;
  ## use Exporter 'import';
  ## our @EXPORT = qw(*var);

  our $var = 10;

}

## BEGIN { X->import; }

BEGIN { no strict 'refs'; *main::var = *X::var; }

# our $var;

is($var,    10, '   $var');
is($X::var, 10, '$X::var');

local $var = 20;

is($var,    20, '   $var');
is($X::var, 20, '$X::var');