Based on:

• Tutorials
  • Perl Idioms Explained
    • Perl Idioms Explained - keys %{{map{$_=>1}@list}}

maybe something like (has similarities to the other solutions as well):

sub extractPartTuplesFromURL {
  my $cgi = shift;
  return values %{{ map {
      my %h; @h{qw/id version classification/} = split(',');
      $h{id} => \%h
    } $cgi->param('partID') }};
}
[download]