perl: Fix warning about unsharing the $led_strip variable