$sBegin = 'hello world';
s/hello/goodbye/g for ($sEnd = $sBegin);
print $sEnd;