my @sports = $q->param('sports');
foreach my $sport ( @sports ) {
    # subscribe them to the list
}