use Package::Branch;

my $obj = Package::Branch->new( {
    trunk => 'trunk',
    branch => 'branch'
} );

print "'$obj->get_trunk'\n";
print "'$obj->get_branch'\n";
print "'$obj->get_trees'\n";