Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env perl

...
[7, 18, 8, 1, 12, 13, 16, 0, 11, 14, 17]
[8, 5, 10, 5, 19, 6, 17, 3, 10, 18, 16]
[9, 1, 15, 10, 17, 8, 11, 18, 2, 18, 6]
  2. or download this
    use Imager;

...
}

# dd \@palette;
  3. or download this
    ...
use Devel::Size qw( total_size );
...
Image Size 20 MP
Queue Size 640.627 MByte
Took 8.150 seconds