my $balance;
@$borrowers = map {
(undef, undef, $balance) = GetMemberIssuesAndFines( $_->{borrowernumber} );
($balance != 0) ? (): ($_);
(defined $balance && $balance != 0) ? (): ($_);
} @$borrowers;
}
-