Here is our module, Hello.pm:

package Hello;
use strict;

sub new {
    my $class = shift;
    my $this = {};
    return bless $this, $class;
}

1;
[download]

And here we use this script:

use strict;
use Hello;

my $a =  Hello->new();
print $a;
[download]

When the above is run, it gives:

Hello=HASH(0x225388)

..which is self-documenting. ;) Hope this helps!