I had a need to write a script that would give me a random first name. I grabbed the top 200 first names for baby boys in the US from 2000-2009, and the same list for baby girls:
My initial implementation just printed out the name, but I quickly realized I needed to print out the gender if I wanted to talk about what the (fictitious) person did. So I updated it to print out the gender as well.
In the course of this I realized that some names appeared on both lists. In particular they are:
The script is called like this:
>perl -w name.pl
EDIT 2015-10-31: moved source to https://github.com/mvaneerde/blog/blob/master/scripts/name.pl