package Hello3;
use strict;
require Exporter;
our @ISA="Exporter";
our @EXPORT_OK = qw(greet);
our $var1 = 1;
my $var2 = 3;
my $str = "Hello World!\n";
sub greet {
   return $str;
}
1;