libmoosex-setonce-perl