sub __init__ ($class, $name, $age)
{
    my $self = bless {name => $name, age => $age}, $class;
}