Power up on perl env