Some generic good to have perl scripts