our $VERSION = '1.00'; #### use vars qw( $VERSION ); .... $VERSION = '1.00'; #### $SomePackage::VERSION = '1.00'; #### sub AUTOLOAD { our $AUTOLOAD; .... };