(my @values = $q->param($key)) =~ s/\cM//g;