package Some::Module;
use vars qw/$VERSION/;
$VERSION = 0.5;
sub VERSION { croak unless $_[0] == $VERSION }