<?PHP
$r[cow]=moo;
$r[sheep]=baa;
$r[duck]=quack;
$r[pig]=oink;
$s=array();
foreach($r as $a=>$b){
\x09$t=a;
\x09if($b=="oink")$t=an;
\x09echo"Old MacDonald had a farm, E-I-E-I-O.\n";
\x09echo"And on his farm he had a $a, E-I-E-I-O.\n";
\x09echo"With $t $b-$b here, and $t $b-$b there.\n";
\x09echo"Here $t $b, there $t $b, everywhere $t $b-$b.\n";
\x09foreach($s as $k=>$c){
\x09\x09echo"A $c-$c here, and a $c-$c there.\n";
\x09\x09echo"Here a $c, there a $c, everywhere a $c-$c.\n";
\x09}
\x09echo"Old MacDonald had a farm, E-I-E-I-O.\n\n";
\x09array_unshift($s,$b);
}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).