Select Code to Download

 - - - - L L R L R L R R
 - L L L R R L - - - R R
 L R - L R - R R - L L -

use strict;
use warnings;

...
  $sum += $_ for @$set;
  return $sum;
}