RosettaCodeData/Task/Population-count/Perl/population-count-2.pl
2023-07-01 13:44:08 -04:00

1 line
47 B
Raku

say unpack("%b*",pack "J*", 1234567); # J = UV