Mega Code Archive

 
Categories / Perl / Regular Expression
 

Troi

while (<>) {     tr/o/i/;     print; }