Select Code to Download

my @terms = split //, $input;
my $sum = 0;
...
    $sum += $values[$i] if $terms[$i] ne '?';
}
print "$input = $sum\n";