Yep, that's a pretty common homework problem. In fact, someone else had such homework about a week ago. What have you tried thus far?

For a cpan module, look at List::Util

Might help if you read this: How do I post a question effectively?.