Commit f645ab19 authored by Matthieu Muffato's avatar Matthieu Muffato
Browse files

Don't need to use a hash since eHive will take care of the redundancy

parent a9fbaafa
......@@ -78,15 +78,12 @@ sub fetch_input {
my $b_multiplier = $self->param_required('b_multiplier');
my %digit_hash = ();
my @sub_tasks;
foreach my $digit (split(//,$b_multiplier)) {
# next if (($digit eq '0') or ($digit eq '1'));
$digit_hash{$digit}++;
push @sub_tasks, { 'digit' => $digit };
}
# parameter hashes of partial multiplications to be computed:
my @sub_tasks = map { { 'digit' => $_ } } sort { $a <=> $b } keys %digit_hash;
# store them for future use:
$self->param('sub_tasks', \@sub_tasks);
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment