Data structure Memory Usage

arunhorne has asked for the wisdom of the Perl Monks concerning the following question:

Monks,

How can I find out how much memory my datastructure is using up, e.g. if I have:

my %struct = ("key1" => ["bill","ben"],
              "key2" => ["dave","jen"]);
[download]

Is the some function I can pass a reference, \%struct to to find out the memory usage?

Thanks,

____________
Arun