print $q->header;
print decode utf8 => $q->param('key');