Is it clear how attributes accessors on objects are going to work yet? I need to say something along the lines of:
sub new { my $class = shift; my ($name, $age) = @_; bless { name => $name, age => $age }, $class; } sub age { my $self=shift; $self->{age} } -- "They laughed at Columbus, they laughed at Fulton, they laughed at the Wright brothers. But they also laughed at Bozo the Clown." -- Carl Sagan