1package Paws::API::StrToObjMapParser {
2  use Moose::Role;
3
4  sub ValueFor {
5    my ($self, $key) = shift;
6    my $value = $self->Map->{ $key };
7    die "No value for $key" if not defined ($value);
8    return $value;
9  }
10}
11
121;
13