#!/usr/bin/perl
use Hello4 qw(greet);
use Hello4;
print "var1= $Hello4::var1\n";
print "var2= $Hello4::var2\n";

print greet();
print greet2();