Help for this page

Select Code to Download

Select or download this

>perl -wMstrict -le
"use List::Util qw(sum);
...
 $s eq $r or die 'not what was wanted';
"
'r 1 y 2 g 7 y 2 r 7 y 8 g 11 r 1 '