my @values = $q->param($key);
tr/\015//d for @values;