foreach($q->param()){
	if(/^[\w\d]+/){
		$stuff .= $_;
		$stuff .= ":";
		$stuff .= $q->param("$_");
		$stuff .= "\n\n";
	}
}

##</code><code>##

list:foo,bar,foobar

##</code><code>##

list:foo