The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

# Copyright (C) 2012 Xerxes Tsang
# This program is free software; you can redistribute it and/or modify it
# under the terms of Perl Artistic License.
use strict;
use base qw/Test::Class/;
sub test_can_create_gender_target_bid_and_set_all_fields : Test(3) {
my $gender_target_bid = Microsoft::AdCenter::V8::CampaignManagementService::GenderTargetBid->new
->Gender('gender')
->IncrementalBid('incremental bid')
;
ok($gender_target_bid);
is($gender_target_bid->Gender, 'gender', 'can get gender');
is($gender_target_bid->IncrementalBid, 'incremental bid', 'can get incremental bid');
};
1;