package Class::Trait::TGetter;

use strict;
use warnings;

use Class::Trait 'base';

sub get
{
    my $self = shift;
    return $self->{object}->{$self->{property}};
}

1;