my $report = $res->result;
foreach my $campaign ( @{ $report->{ClickFraudReport}{Campaigns} } ) {
    print $campaign->{Name};
    print $campaign->{Cost};
}