foreach my $campaign 
	(@{$output->{'SOAP-ENV:Body'}->{APIResponse}->{ClickFraudReport}->{Campaigns}->{Campaign}} ) {
	print "\n\n";
	print " Campaign: $campaign->{Name}\n";
	print " Cost: $campaign->{Cost}\n";
        ...