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