use Module 1.0; #### use Module 2.0; #### package Module; our ($VERSION, @EXPORT, @ISA); use Exporter; @ISA=qw#Exporter#; $VERSION = q#1.0#; sub routine1 { print "This is version: $VERSION\n"; } $VERSION = q#2.0#; sub routine1 { print "This is version: $VERSION\n"; } 1;