print $query->header(-charset=>'utf-8');
print $query->start_html(-encoding=>'utf-8');

##</code><code>##

Content-Type: text/html; charset=utf-8
 
<?xml version="1.0" encoding="utf-8"?>