package CGI::Armature::Bridge;

use strict;

sub new {
    my $class = shift;
    my $object_ref = shift;
    my $method_map = shift;
    my $self = {
        object=>$object_ref,
    };
    $self-{$_} = $method_map->{$_} for keys %$method_map;
    return bless($self, $class);
}

1;