Reverse the gender of a string: Difference between revisions

Line 148:
 
function : CheapTrick(s : String) ~ String {
if(s->FindHas("She") > -1) {
return s->ReplaceAll("She", "He");
}
else if(s->FindHas("He") > -1) {
return s->ReplaceAll("He", "She");
};
Line 165:
She was a soul stripper. She took my heart!
</pre>
 
 
=={{header|Perl 6}}==
760

edits