#!/usr/bin/perl -w use strict; package pkg; { our $var="foo"; our @EXPORT=qw($var); use Exporter qw(import); } package main; use strict; use warnings; import pkg; BEGIN { *var=\$pkg::var;} print "var=$var\n";