my %param;
foreach ( param ) {
	$param{$_} = param($_);
}