foreach my $name ( @names ) {
    my @values = param( $name );
    print "Name = $name, Value(s) = " , join (',' @values) , "<br>\n";
}