Top > CGI(perl) > tr///
#!/usr/bin/perl $before = "abcdabceabcf"; $after = $before; $after =~ tr/abc/A4Z/; print "Content-type:text/html\n\n"; print "before = $before<br>"; print " ↓<br>"; print "after = $after<br>"; ●出力結果 before = abcdabceabcf ↓ after = A4ZdA4ZeA4Zf