sub calculate_foo { my $self = shift; return $self->foo($self->foo + 999); }