- or download this
my %value = (
A => 1.5,
...
B => 55/100,
C => 60/100,
);
- or download this
my @letters = split //, $expanded_string;
my $result = 0;
...
};
print $result;
- or download this
$result = 1.5 * (50/100) * 2 + 2.5 * (55/100) * 2 + 3.5 * (60/100) * 2