おっと、ソースまで見てなかったぜ

print qq|Content-type: text/html; charset=euc-jp\n\n|;
これも替えとけ。つーか気づけw