Select Code to Download

my $sum = 0;
foreach my $i (1 .. 80) {
    no strict 'refs';
    $sum += ${"Sel${i}Ttl"};
}

my $sum = 0;
foreach my $i (1 .. 80) {
    $sum += do {eval "$Sel${i}Ttl"}
}

my $sum = 0;
local $" = "+";
eval "\$sum = @{[map {qq {\$Sel${_}Ttl}} 1 .. 80]}";