姓名 RPi :: UnicornHatHD-在Perl中使用Pimoroni的超棒独角兽HAT HD 概要 use RPi::UnicornHatHD; my $display = RPi::UnicornHatHD -> new(); while (1) { # Mini rave! $display -> set_all( sprintf ' #X ' , int rand ( hex ' FFFFFF ' )); for (0 .. 100, reverse 0 .. 100) {