Select Code to Download

$VAR1 = {
    'ClickFraudReport' => {
...
         ],
    },
};

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