#!/usr/bin/perl -w { package jim; require Exporter; our @ISA = qw(Exporter); our $bar = 'foo'; our @EXPORT_OK = qw($bar); } package main; use strict; import jim qw/$bar/; print "our bar $::bar\n"; print "pkg ".__PACKAGE__." - bar: $bar\n";