del mysql perl php