foreach my $customer (keys %money_spent) {
    my $money_sent_by_this_customer = $money_spent{$customer};
    
    # do something with $customer and $money_spent_by_this_customer

}