############## Manager.pm #########
package Manager;

use Exporter;

@ISA = qw(Exporter);
@EXPORT = qw ($var);
my $var;
sub new {
	my $caller = shift;
	my $class = ref($caller);
	my $self = bless {}, $class;
	return $self;
}

sub import {
	print "Hello world\n";
        $var ="PerlHacks"; 
}

1;