#!/usr/bin/perl -w
use strict;
use MyPackage;

my $p = MyPackage->new();
$$p{Hello} = "world";
print $p->to_string, "\n";