in reply to Problem with My New Perl Object

use strict, my son.

Then you would see that $self{foo} is not $self->{foo}.

-- Randal L. Schwartz, Perl hacker