package Quota;
sub project { return shift->account()->project() }
#...
my $project_from_quota = $quota->project();