/usr/local/CPAN/Bing-Search/Bing/Search/Role/SearchRequest/AppId.pm


package Bing::Search::Role::SearchRequest::AppId;
use Moose::Role;

requires 'build_request';
requires 'params';


has 'AppId' => (
   is => 'rw',
   isa => 'Str',
   default => '70960FEFD7F90995151FCF92D6422BEB644AACE2',
   required => 1
);

before 'build_request' => sub { 
   my $self = shift;
   my $hash = $self->params;
   $hash->{AppId} = $self->AppId;
   $self->params( $hash );
};

1;