俺なら
print $char, "\n";
かな