[...]
As already stated by Joe you have two possibilities:
1. Use Hashslice-Sytanx (very short hand)
my %hash = ();
foreach( $r->param() ) {
@hash{$r->param($_)} = ( 1 );
}
2. For a more verbose version you should use a inner foreach:
my %hash = ();
foreach( $r->param() ) {
foreach( $r->param($_) ) {
$hash{$_} = 1;
}
}
Why are you using a hashref? do you really need it?
Tom
--
NEU: WLAN-Router f�r 0,- EUR* - auch f�r DSL-Wechsler!
GMX DSL = superg�nstig & kabellos http://www.gmx.net/de/go/dsl
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html
