#! /usr/bin/env perl package A; require Exporter; our @ISA = qw(Exporter); our @EXPORT_OK = qw (sub1 $var); our %EXPORT_TAGS = (all => [ qw(sub1 $var) ]); our $var = 7; sub sub1 { print "this\n"; } 1; #### #! /usr/bin/env perl use strict; use warnings; use lib '.'; require A; A->import (':all'); sub1(); print $var . "\n"; #### #! /usr/bin/env perl use strict; use warnings; use lib '.'; use A ':all'; print $var . "\n";