my %CaseToMethod = (
    FIRST_CASE => 'FirstMethod',
    SECOND_CASE => 'SecondMethod',
);

for my $i (0 .. $SomeValue - 1)
{
    my $method = $CaseToMethod($some_param->GetID);
    $SomeArray[$i]{value} = $some_param->$method;
}