simple examples of how to do various things in perl