Updates to a few perl scripts.