【Perl 】初心者コーナーPart5

このエントリーをはてなブックマークに追加
161名無しさん@お腹いっぱい。
#!/usr/bin/perl

$str = "12345";
$str =~ tr/0-9/0-9/;

print "Content-type: text/html\n\n";
print $str, "\n";
print "</body></html>\n";

とすると出力が

0203040506

となってしまいます、普通に 12345 とは表示できないのでしょうか?