Photo management system written in perl