package A; use base qw(Exporter); our $VERSION = '0.0.1' our @EXPORT_OK = qw($VERSION); package B; use A qw($VERSION);