foreach ($text) { s/&/&/g; s//>/g; s/\n/
/g; }