新10 1-
345:デフォルトの名無しさん / :
$nurupo = "山崎渉";
$nurupo =~ s/山/ぬ/;
$nurupo =~ s/崎/る/;
$nurupo =~ s/渉/ぽ/;
print($nurupo);

ir ver 1.0 beta2.2 (03/10/22)